Metrics for math.log10 on complex, real part

start0.0ms (0%)

Memory: 0.4MiB live, 0.4MiB allocated; 0ms collecting garbage

analyze102.0ms (1.8%)

Memory

5.6MiB live, 106.1MiB allocated; 25ms collecting garbage

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
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)

sample1.2s (21.5%)

Memory

26.2MiB live, 1 387.0MiB allocated; 253ms collecting garbage

Samples

929.0ms

8 256×

valid

Precisions

Click to see histograms. Total time spent on operations: 570.0ms

ival-log: 266.0ms (46.7% of total)

ival-hypot: 187.0ms (32.8% of total)

ival-div: 100.0ms (17.6% of total)

ival-true: 6.0ms (1.1% of total)

exact: 5.0ms (0.9% of total)

ival-assert: 3.0ms (0.5% of total)

adjust: 2.0ms (0.4% of total)

Bogosity

explain127.0ms (2.3%)

Memory

5.1MiB live, 242.6MiB allocated; 17ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
145	-	1	(1.0105520697913161e-260 -2.156445680468672e-161)	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
0	-	0	-	`(log.f64 #s(literal 10 binary64))`
0	-	0	-	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
0	-	0	-	`(*.f64 re re)`
0	-	0	-	`im`
0	-	0	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	-	0	-	`re`
0	-	0	-	`(*.f64 im im)`
0	-	0	-	`#s(literal 10 binary64)`
0	-	0	-	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	oflow-rescue	127	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	127
↳	`(*.f64 re re)`	overflow	67
↳	`(*.f64 im im)`	overflow	76
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	uflow-rescue	17	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	17
↳	`(*.f64 re re)`	underflow	73
↳	`(*.f64 im im)`	underflow	58

Confusion

	Predicted +	Predicted -
+	144	1
-	0	111

Precision

1.0

Recall

0.993103448275862

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	144	0	1
-	0	0	111

Precision?

1.0

Recall?

0.993103448275862

Freqs

test

number	freq
0	112
1	144

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

54.0ms

512×

valid

Compiler

Compiled 110 to 34 computations (69.1% saved)

Precisions

Click to see histograms. Total time spent on operations: 38.0ms

ival-hypot: 11.0ms (28.6% of total)

ival-log: 11.0ms (28.6% of total)

ival-mult: 9.0ms (23.4% of total)

ival-div: 3.0ms (7.8% of total)

ival-add: 2.0ms (5.2% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

preprocess19.0ms (0.3%)

Memory

-15.0MiB live, 30.7MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	24	62
1	57	62
2	107	62
3	132	62
4	170	62
0	10	12
0	17	12
1	28	12
2	67	12
3	124	12
4	161	12
0	161	7

Stop Event

1×	iter limit
1×	saturated
1×	iter limit
1×	saturated

Calls

Call 1

Inputs
(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))

Outputs
(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))

Symmetry

(abs im)

(abs re)

(sort re im)

Compiler

Compiled 12 to 10 computations (16.7% saved)

eval0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 2 computations (-∞% saved)

prune0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated; 0ms collecting garbage

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	44.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)

simplify5.0ms (0.1%)

Memory

5.8MiB live, 5.8MiB allocated; 0ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	0	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
cost-diff	0	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
cost-diff	1	(+.f64 (.f64 re re) (.f64 im im))
cost-diff	4	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	10	47
0	17	47
1	28	47
2	67	47
3	124	47
4	161	47
0	161	31

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

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

localize83.0ms (1.5%)

Memory

-10.1MiB live, 53.7MiB allocated; 100ms collecting garbage

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.0	(log.f64 #s(literal 10 binary64))
accuracy	0.00390625	(+.f64 (.f64 re re) (.f64 im im))
accuracy	0.6409950683790943	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
accuracy	33.58410844544959	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Samples

75.0ms

256×

valid

Compiler

Compiled 49 to 12 computations (75.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 15.0ms

ival-log: 5.0ms (33.9% of total)

ival-hypot: 4.0ms (27.1% of total)

ival-mult: 3.0ms (20.3% of total)

ival-div: 1.0ms (6.8% of total)

ival-add: 1.0ms (6.8% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

series13.0ms (0.2%)

Memory

21.1MiB live, 21.1MiB allocated; 0ms collecting garbage

Counts

5 → 75

Calls

Call 1

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

Outputs
#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 (/ (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 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 (* -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 (* 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 (/ (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 (* 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))))))))))
#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))))))))

Calls

6 calls:

Time	Variable		Point	Expression
3.0ms	re	@	0	((sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log 10))
3.0ms	re	@	inf	((sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log 10))
3.0ms	im	@	0	((sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log 10))
2.0ms	im	@	inf	((sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log 10))
1.0ms	im	@	-inf	((sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log 10))

simplify147.0ms (2.6%)

Memory

-15.7MiB live, 177.5MiB allocated; 20ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	349	2323
1	897	2291
2	3891	2217
0	8246	1761

Stop Event

1×	iter limit
1×	node limit

Counts

75 → 75

Calls

Call 1

Inputs
#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 (/ (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 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 (* -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 (* 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 (/ (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 (* 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))))))))))
#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))))))))

Outputs
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) 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))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 re re) 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))) (fma.f64 (fma.f64 (.f64 re (/.f64 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))) #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 (sqrt (+ (* re re) (* im im))) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (fma.f64 (.f64 re (/.f64 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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 re re) im)))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* re re) (* im im)) (*.f64 im im))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (+ (* re re) (* im im)) (fma.f64 im im (*.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)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (/.f64 (/.f64 (*.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) im) im)) (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)) #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)))) (log 10)) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (/.f64 (fma.f64 (.f64 re (/.f64 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)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (/.f64 (/.f64 (.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (fma.f64 (/.f64 (/.f64 (*.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im)))
#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)))) (fma.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) im) im)) (.f64 re re) (log.f64 im)))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (fma.f64 (.f64 re (/.f64 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)))) (fma.f64 (/.f64 (/.f64 (.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) 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))) (fma.f64 (.f64 re #s(literal 1/2 binary64)) (.f64 (/.f64 im re) (/.f64 im re)) re))
#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))) (.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 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im #s(literal 1 binary64))) re))
#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 (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) re re))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* re re) (* im im)) (*.f64 re re))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#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)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#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)) #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)) (/.f64 (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re)) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (log.f64 re)))
#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)))) (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 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))) (.f64 (neg.f64 re) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im #s(literal 1 binary64))))
#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))) (.f64 (neg.f64 re) (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 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im #s(literal 1 binary64)))))
#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 (sqrt (+ (* re re) (* im im))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) re 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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.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)) #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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.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)) #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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64)))) #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#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)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#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)))) (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 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#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 (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 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64)))) #s(literal 1/720 binary64) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 im im) 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))) (fma.f64 (fma.f64 (.f64 im (/.f64 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))) #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 (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 (/ (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)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) re) re)) (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)) #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)))) (log 10)) (fma.f64 (/.f64 (fma.f64 (.f64 im (/.f64 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)))) (log.f64 #s(literal 10 binary64))) (pow.f64 im #s(literal 4 binary64)) (/.f64 (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) re) re) im) im (log.f64 re)))
#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)))) (fma.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 (/.f64 #s(literal 1/2 binary64) re) re)) (.f64 im im) (log.f64 re)))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 (/.f64 #s(literal 1/2 binary64) re) re)) (*.f64 im im) (log.f64 re)))
#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))) (.f64 (fma.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) (.f64 re re) #s(literal 1 binary64)) im))
#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))) (.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 (/.f64 #s(literal 1/2 binary64) im) im) (.f64 re re) #s(literal 1 binary64))) im))
#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 (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 im #s(literal 4 binary64))))) im im))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#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)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#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)) #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)) (/.f64 (fma.f64 (/.f64 (/.f64 (*.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (fma.f64 (/.f64 (/.f64 (*.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (fma.f64 (/.f64 (/.f64 (*.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im)))
#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)))) (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 (*.f64 re re) im) im) #s(literal 1/2 binary64) (log.f64 im))))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 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))) (.f64 (neg.f64 im) (fma.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) (.f64 re re) #s(literal 1 binary64))))
#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))) (.f64 (neg.f64 im) (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 (/.f64 #s(literal 1/2 binary64) im) im) (.f64 re re) #s(literal 1 binary64)))))
#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 (sqrt (+ (* re re) (* im im))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 im #s(literal 4 binary64))))) im 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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (neg.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)) #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)) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (.f64 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) (neg.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)) #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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#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)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#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)))) (fma.f64 (*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#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 (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 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) #s(literal 1/720 binary64) (fma.f64 (.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) im) im) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64)))))))

rewrite51.0ms (0.9%)

Memory

18.9MiB live, 65.4MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	10	38
0	17	38
1	49	38
0	369	22

Stop Event

1×	iter limit
1×	iter limit
1×	iter limit
1×	unsound
1×	iter limit

Counts

5 → 152

Calls

Call 1

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

Outputs
(.f64 (pow.f64 (fma.f64 im im (.f64 re re)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/4 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 im) (-.f64 re im))))
(/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.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)))))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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) (pow.f64 re #s(literal 1 binary64)))
(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) (pow.f64 im #s(literal 1 binary64)))
(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) (pow.f64 re #s(literal 1 binary64)))
(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) (pow.f64 im #s(literal 1 binary64)))
(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 (pow.f64 re #s(literal 1 binary64)))
(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 (pow.f64 im #s(literal 1 binary64)))
(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 (-.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 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (neg.f64 im) im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 re im) (-.f64 re im)))
(/.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 re im) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #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))))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(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 (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 (neg.f64 (neg.f64 im)) im))
(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 (neg.f64 (neg.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 (neg.f64 (neg.f64 im)) im))
(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 (neg.f64 (neg.f64 im)) im))
(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 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 re im) (-.f64 re im))))
(-.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 re)) (neg.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 im im) (.f64 re (neg.f64 re)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (pow.f64 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 im im) (.f64 re re))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(/.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)))
(neg.f64 (/.f64 (neg.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 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re))))
(log.f64 (hypot.f64 im re))
(log.f64 #s(literal 10 binary64))

eval30.0ms (0.5%)

Memory: -36.1MiB live, 56.8MiB allocated; 6ms collecting garbage
Compiler: Compiled 3 961 to 883 computations (77.7% saved)

prune4.0ms (0.1%)

Memory

15.5MiB live, 15.5MiB allocated; 0ms collecting garbage

Pruning

4 alts after pruning (4 fresh and 0 done)

	Pruned	Kept	Total
New	215	4	219
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	216	4	220

Accuracy

99.7%

Counts

220 → 4

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	44.9%	(/.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re)))) (log.f64 #s(literal 10 binary64)))
▶	99.1%	(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
▶	99.0%	(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
▶	98.4%	(/.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)

simplify6.0ms (0.1%)

Memory

11.5MiB live, 11.5MiB allocated; 0ms collecting garbage

Localize:

Found 16 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(fma.f64 im im (*.f64 re re))
cost-diff	0	(log.f64 (fma.f64 im im (*.f64 re re)))
cost-diff	0	(.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re)))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	(hypot.f64 im re)
cost-diff	0	(log.f64 (hypot.f64 im re))
cost-diff	0	(neg.f64 (log.f64 (hypot.f64 im re)))
cost-diff	0	(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
cost-diff	0	(log.f64 #s(literal 10 binary64))
cost-diff	0	(hypot.f64 re im)
cost-diff	0	(log.f64 (hypot.f64 re im))
cost-diff	0	(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
cost-diff	0	(log.f64 #s(literal 10 binary64))
cost-diff	0	#s(approx (sqrt (+ (* re re) (* im im))) im)
cost-diff	0	(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
cost-diff	0	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	26	111
0	44	111
1	63	111
2	108	111
3	165	111
4	204	111
0	204	111

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

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

Outputs
(/.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)))
(/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(log.f64 (hypot.f64 re im))
(log.f64 (hypot.f64 im re))
(hypot.f64 re im)
(hypot.f64 im re)
re
im
(log.f64 #s(literal 10 binary64))
#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)) (neg.f64 (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)
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 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (log.f64 (fma.f64 im im (.f64 re re))))
(.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re))))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
im
(*.f64 re re)
re
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)

localize69.0ms (1.2%)

Memory

-30.2MiB live, 115.6MiB allocated; 10ms collecting garbage

Localize:

Found 16 expressions of interest:

New	Metric	Score
accuracy	0.0	(.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re))))
accuracy	0.0	(log.f64 #s(literal 10 binary64))
accuracy	0.6409950683790943	(/.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 im im (.f64 re re)))) (log.f64 #s(literal 10 binary64)))
accuracy	34.997565789526945	(log.f64 (fma.f64 im im (*.f64 re re)))
accuracy	0.0	(neg.f64 (log.f64 (hypot.f64 im re)))
accuracy	0.0	(log.f64 (hypot.f64 im re))
accuracy	0.6409950683790943	(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
accuracy	1.0	(log.f64 #s(literal 1/10 binary64))
accuracy	0.0	(hypot.f64 re im)
accuracy	0.0	(log.f64 (hypot.f64 re im))
accuracy	0.0	(log.f64 #s(literal 10 binary64))
accuracy	0.6409950683790943	(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
accuracy	0.0	(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
accuracy	0.0	(log.f64 #s(literal 10 binary64))
accuracy	0.5693630984369682	#s(approx (sqrt (+ (* re re) (* im im))) im)
accuracy	0.6409950683790943	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))

Samples

53.0ms

256×

valid

Compiler

Compiled 161 to 22 computations (86.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 37.0ms

ival-log: 12.0ms (32.7% of total)

ival-hypot: 8.0ms (21.8% of total)

ival-mult: 6.0ms (16.3% of total)

ival-div: 4.0ms (10.9% of total)

const: 3.0ms (8.2% of total)

ival-add: 1.0ms (2.7% of total)

ival-neg: 1.0ms (2.7% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

series23.0ms (0.4%)

Memory

42.4MiB live, 42.4MiB allocated; 0ms collecting garbage

Counts

16 → 241

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)
(log.f64 #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)
(/.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)
(/.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))))
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
(log.f64 #s(literal 1/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 (/ (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 (/ (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 (/ (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:

Time	Variable		Point	Expression
4.0ms	im	@	0	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (log 10) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (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))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10))
3.0ms	re	@	inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (log 10) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (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))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10))
3.0ms	re	@	0	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (log 10) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (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))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10))
3.0ms	im	@	inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (log 10) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (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))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10))
3.0ms	re	@	-inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (log 10) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (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))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10))

simplify242.0ms (4.3%)

Memory

-3.7MiB live, 280.1MiB allocated; 36ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	744	7701
1	1731	7567
2	7100	7357
0	8079	6169

Stop Event

1×	iter limit
1×	node limit

Counts

241 → 241

Calls

Call 1

Inputs
#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 (/ (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 (/ (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 (/ (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
#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)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (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)) #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)))) (log 10)) (fma.f64 (fma.f64 (/.f64 (fma.f64 (.f64 re (/.f64 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)))) (log.f64 #s(literal 10 binary64))) (.f64 re re) (/.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (.f64 im im))) (.f64 re re) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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 (+ (* im im) (* re re)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)))
#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 (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re) (log.f64 im)))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (.f64 re (/.f64 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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) im)
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 re re) 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 (+ (* im im) (* re re))) (fma.f64 (fma.f64 (.f64 re (/.f64 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))) #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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (.f64 re (/.f64 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)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#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)) (/.f64 (-.f64 (.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im)) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#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)) (fma.f64 (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) re) re (/.f64 #s(literal -1/2 binary64) (.f64 im im))) (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))))) (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))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 re (/.f64 re (pow.f64 im #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 1/10 binary64))) (.f64 re re) (/.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (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))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 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))))) (-.f64 (.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im)) (log.f64 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))))) (-.f64 (.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) re) re (/.f64 #s(literal -1/2 binary64) (.f64 im im))) (.f64 re re)) (log.f64 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 (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 re (/.f64 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 #s(literal -1/2 binary64) (.f64 im im))) (*.f64 re re)) (log.f64 im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)))
#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)))) (fma.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re) (log.f64 im)))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (.f64 re (/.f64 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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) 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))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 re re) 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))) (fma.f64 (fma.f64 (.f64 re (/.f64 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))) #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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (.f64 re (/.f64 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)))) (log 10)) #s(hole binary64 (* 1/2 (/ (log (pow im 2)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (.f64 (log.f64 (.f64 im im)) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64)))))
#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)) (.f64 (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#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)) (fma.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (log.f64 #s(literal 10 binary64))) (*.f64 re re))))
#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)))) (log 10)) (fma.f64 (.f64 (.f64 re re) (.f64 re re)) (/.f64 (fma.f64 (.f64 re (/.f64 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)))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (.f64 (log.f64 (.f64 im im)) #s(literal 1/2 binary64)))
#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)))) (.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) #s(literal 1/2 binary64)))
#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)))) (fma.f64 (log.f64 (.f64 im im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (.f64 im im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (fma.f64 (.f64 re (/.f64 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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (*.f64 im im)))
#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))) (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (*.f64 im im))))
#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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 re (/.f64 re (pow.f64 im #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (.f64 im im))))
#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 (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/3 binary64) (.f64 re (/.f64 re (pow.f64 im #s(literal 6 binary64)))) (/.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (*.f64 im im))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* im im) (* re re)) (*.f64 im im))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (+ (* im im) (* re re)) (fma.f64 im im (*.f64 re 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)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re)) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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 (+ (* im im) (* re re)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)))
#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 (+ (* im im) (* re re)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) re)
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (.f64 re #s(literal 1/2 binary64)) (.f64 (/.f64 im re) (/.f64 im re)) re))
#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 (+ (* im im) (* re re))) (fma.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) re re))
#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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) re 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)) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#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)) (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 re))) (log.f64 #s(literal 1/10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#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))))) (log 1/10)) (+.f64 (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (.f64 im im) re) (/.f64 (.f64 #s(literal -1/720 binary64) (.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 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))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 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))))) (-.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 #s(literal 1/2 binary64) (*.f64 re re)) im) im (log.f64 re))))
#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 (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (.f64 #s(literal -1/720 binary64) (.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)))
#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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) 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))) (fma.f64 (.f64 re #s(literal 1/2 binary64)) (.f64 (/.f64 im re) (/.f64 im re)) re))
#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))) (fma.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) re re))
#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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) re re))
#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)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re)) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#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)))) (log.f64 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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)))
#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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 re) #s(literal 2 binary64)))
#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))) (fma.f64 (/.f64 im re) (/.f64 im re) (*.f64 (log.f64 re) #s(literal 2 binary64))))
#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))) (fma.f64 (log.f64 re) #s(literal 2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#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 (+ (* im im) (* re re))) (fma.f64 (log.f64 re) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* im im) (* re re)) (*.f64 re re))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (+ (* im im) (* re re)) (.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)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.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)) #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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.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)) #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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64)))) #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#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 (+ (* im im) (* re 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 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#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 (log (sqrt (+ (* im im) (* re re)))) (-.f64 (fma.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64)))) #s(literal 1/720 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 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 (+ (* im im) (* re re))) (.f64 (neg.f64 re) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) im #s(literal 1 binary64))))
#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 (+ (* im im) (* re re))) (.f64 (neg.f64 re) (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 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) im #s(literal 1 binary64)))))
#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 (sqrt (+ (* im im) (* re re))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) re 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)) (/.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)) #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)) (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (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)) #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)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (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)) #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))))) (log 1/10)) (+.f64 (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (.f64 im im) re) (/.f64 (.f64 #s(literal -1/720 binary64) (*.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))) (/.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 re))))
#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))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (-.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) im)))
#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 (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#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)))) (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 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#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 (log (sqrt (+ (* im im) (* re re)))) (-.f64 (fma.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64)))) #s(literal 1/720 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 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))) (.f64 (neg.f64 re) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) im #s(literal 1 binary64))))
#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))) (.f64 (neg.f64 re) (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 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) im #s(literal 1 binary64)))))
#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 (sqrt (+ (* im im) (* re re))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) re re)))
#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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))) (log.f64 #s(literal 10 binary64)))))
#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)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im 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)))) #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)))) (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 im re) (/.f64 im 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)))) #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 (* 1/2 (log (+ (* im im) (* re re)))) (-.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (*.f64 (/.f64 im re) (/.f64 im re))))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#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 (+ (* 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 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
#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)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (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)) #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)))) (log 10)) (fma.f64 (fma.f64 (/.f64 (fma.f64 (.f64 im (/.f64 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)))) (log.f64 #s(literal 10 binary64))) (.f64 im im) (/.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (.f64 re re))) (.f64 im im) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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 (+ (* im im) (* re re)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)))
#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 (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im) (log.f64 re)))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 im im) 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 (+ (* im im) (* re re))) (fma.f64 (fma.f64 (.f64 im (/.f64 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))) #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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#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)) (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 re))) (log.f64 #s(literal 1/10 binary64))))
#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)) (fma.f64 (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) im) im (/.f64 #s(literal -1/2 binary64) (.f64 re re))) (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))))) (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))))) (log 1/10)) (fma.f64 (fma.f64 (/.f64 (fma.f64 (.f64 im (/.f64 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)))) (log.f64 #s(literal 1/10 binary64))) (.f64 im im) (/.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (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))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 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))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 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))))) (-.f64 (.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) im) im (/.f64 #s(literal -1/2 binary64) (.f64 re re))) (.f64 im im)) (log.f64 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 (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 #s(literal -1/2 binary64) (.f64 re re))) (*.f64 im im)) (log.f64 re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) im) im (log.f64 re)))
#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)))) (fma.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im) (log.f64 re)))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 im im) 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))) (fma.f64 (fma.f64 (.f64 im (/.f64 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))) #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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 (/ (* 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)) (.f64 (log.f64 (.f64 re re)) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64)))))
#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)) (.f64 (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#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)) (fma.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (.f64 (/.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (log.f64 #s(literal 10 binary64))) (*.f64 im im))))
#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)))) (log 10)) (fma.f64 (.f64 (.f64 im im) (.f64 im im)) (/.f64 (fma.f64 (.f64 im (/.f64 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)))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64)))
#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)))) (.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) #s(literal 1/2 binary64)))
#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)))) (fma.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/4 binary64) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64) (.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (*.f64 re re)))
#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))) (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (*.f64 re re))))
#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))) (fma.f64 (fma.f64 (.f64 im (/.f64 im (pow.f64 re #s(literal 4 binary64)))) #s(literal -1/2 binary64) (/.f64 (/.f64 #s(literal 1 binary64) re) re)) (.f64 im im) (log.f64 (*.f64 re re))))
#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 (+ (* im im) (* re re))) (fma.f64 (fma.f64 (fma.f64 (.f64 im (/.f64 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) (/.f64 (/.f64 #s(literal 1 binary64) re) re)) (.f64 im im) (log.f64 (.f64 re re))))
#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)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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 (+ (* im im) (* re re)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)))
#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 (+ (* im im) (* re re)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im))))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.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))) #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))) (.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) #s(literal 1 binary64))) im))
#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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 im #s(literal 4 binary64))))) im im))
#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)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#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)) (/.f64 (-.f64 (.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im)) (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (neg.f64 (log.f64 im))) (log.f64 #s(literal 1/10 binary64)))))
#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))))) (log 1/10)) (+.f64 (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal -1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))) (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (neg.f64 (log.f64 im))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 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))))) (-.f64 (.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im)) (log.f64 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))))) (-.f64 (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re (log.f64 im))))
#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 (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal -1/720 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (log.f64 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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)))
#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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im))))
#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 (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (.f64 (.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#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))) (.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) #s(literal 1 binary64)) im))
#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))) (.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) #s(literal 1 binary64))) im))
#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 (sqrt (+ (* im im) (* re re))) (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 im #s(literal 4 binary64))))) im im))
#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)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#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)) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im)) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 1/6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 10 binary64)))))
#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)))) (log.f64 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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (log.f64 im)))
#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)))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 1/6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 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))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#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))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#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 (log (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (+ (* im im) (* re re)) (.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)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.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)) #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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.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)) #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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))) (log.f64 #s(literal 10 binary64)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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 (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#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 (+ (* im im) (* re re)))) (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 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#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 (log (sqrt (+ (* im im) (* re re)))) (-.f64 (fma.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) #s(literal 1/720 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 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 (+ (* im im) (* re re))) (.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))) #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))) (.f64 (neg.f64 im) (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) #s(literal 1 binary64)))))
#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 (sqrt (+ (* im im) (* re re))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 im #s(literal 4 binary64))))) im im)))
#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)) (/.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)) #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)) (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (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)) #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)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (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)) #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))))) (log 1/10)) (+.f64 (/.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 (*.f64 #s(literal 120 binary64) (pow.f64 re #s(literal 6 binary64))) #s(literal -1/720 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 #s(literal 1/10 binary64))) (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (log (/ -1 im))))
#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))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (-.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)))
#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 (neg (log (sqrt (+ (* im im) (* re re))))) (-.f64 (fma.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) #s(literal -1/720 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#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)))) (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 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#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 (log (sqrt (+ (* im im) (* re re)))) (-.f64 (fma.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) (/.f64 #s(literal 120 binary64) (pow.f64 im #s(literal 6 binary64)))) #s(literal 1/720 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) (neg.f64 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))) (.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 (+ (* 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))) (.f64 (neg.f64 im) (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) #s(literal 1 binary64)))))
#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 (sqrt (+ (* im im) (* re re))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/16 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 im #s(literal 4 binary64))))) im im)))
#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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (/.f64 (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))) (log.f64 #s(literal 10 binary64))))
#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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))) (log.f64 #s(literal 10 binary64)))))
#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)))) (log 10)) (+.f64 (/.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))) (log.f64 #s(literal 10 binary64)))))
#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)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re 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)))) #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)))) (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 re im) (/.f64 re 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)))) #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 (* 1/2 (log (+ (* im im) (* re re)))) (-.f64 (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/6 binary64) (fma.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) re) re (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#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 (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 6 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))))))

rewrite45.0ms (0.8%)

Memory

-0.1MiB live, 45.5MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	26	92
0	44	81
1	105	81
0	611	81

Stop Event

1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit

Counts

16 → 320

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)
(log.f64 #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)
(/.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)
(/.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))))
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
(log.f64 #s(literal 1/10 binary64))

Outputs
(/.f64 (neg.f64 (neg.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 (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 10 binary64))))
(neg.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 1/10 binary64))))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
(.f64 (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) (/.f64 #s(literal 1/2 binary64) (log.f64 #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 (/.f64 #s(literal 1 binary64) (pow.f64 (hypot.f64 im re) #s(literal -1 binary64))))
(log.f64 (hypot.f64 im re))
(.f64 (pow.f64 (fma.f64 im im (.f64 re re)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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) (pow.f64 re #s(literal 1 binary64)))
(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) (pow.f64 im #s(literal 1 binary64)))
(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) (pow.f64 re #s(literal 1 binary64)))
(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) (pow.f64 im #s(literal 1 binary64)))
(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 (pow.f64 re #s(literal 1 binary64)))
(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 (pow.f64 im #s(literal 1 binary64)))
(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 (log.f64 (hypot.f64 im re)))
(.f64 (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) (/.f64 #s(literal 1/2 binary64) (log.f64 #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 (neg.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))))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64))
(.f64 #s(literal 1/2 binary64) (neg.f64 (log.f64 (fma.f64 im im (.f64 re re)))))
(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 (/.f64 #s(literal 1 binary64) (pow.f64 (hypot.f64 im re) #s(literal -1 binary64))))
(log.f64 (hypot.f64 im re))
(.f64 (pow.f64 (fma.f64 im im (.f64 re re)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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)) (pow.f64 re #s(literal 1 binary64)))
(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)) (pow.f64 im #s(literal 1 binary64)))
(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) (pow.f64 re #s(literal 1 binary64)))
(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) (pow.f64 im #s(literal 1 binary64)))
(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) (pow.f64 re #s(literal 1 binary64)))
(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) (pow.f64 im #s(literal 1 binary64)))
(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 (pow.f64 re #s(literal 1 binary64)))
(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 (pow.f64 im #s(literal 1 binary64)))
(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 (log.f64 (hypot.f64 im re)))
(.f64 (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) (/.f64 #s(literal 1/2 binary64) (log.f64 #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 (/.f64 #s(literal 1 binary64) (pow.f64 (hypot.f64 im re) #s(literal -1 binary64))))
(log.f64 (hypot.f64 im re))
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (log.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(log.f64 (fma.f64 im im (*.f64 re re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (neg.f64 im) im)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (.f64 (neg.f64 re) re)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 re im) (-.f64 re im)))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(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 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(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 (neg.f64 (neg.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 (neg.f64 (neg.f64 im)) im))
(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 (neg.f64 (neg.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 (neg.f64 (neg.f64 re)) re))
(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 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 im im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 re im) (-.f64 re im))))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(-.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 re)) (neg.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(+.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 re)) re))
(+.f64 (.f64 im im) (.f64 re re))
(neg.f64 (log.f64 #s(literal 10 binary64)))
(log.f64 #s(literal 1/10 binary64))

eval63.0ms (1.1%)

Memory: -17.1MiB live, 73.7MiB allocated; 15ms collecting garbage
Compiler: Compiled 8 557 to 1 420 computations (83.4% saved)

prune9.0ms (0.2%)

Memory

26.3MiB live, 26.3MiB allocated; 0ms collecting garbage

Pruning

7 alts after pruning (4 fresh and 3 done)

	Pruned	Kept	Total
New	371	4	375
Fresh	0	0	0
Picked	1	3	4
Done	0	0	0
Total	372	7	379

Accuracy

99.7%

Counts

379 → 7

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	44.9%	(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
▶	16.4%	(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
▶	98.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
✓	99.1%	(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
▶	98.5%	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
✓	99.0%	(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
✓	98.4%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))

Compiler

Compiled 109 to 87 computations (20.2% saved)

simplify152.0ms (2.7%)

Memory

-3.8MiB live, 99.4MiB allocated; 10ms collecting garbage

Localize:

Found 16 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(fma.f64 im im (*.f64 re re))
cost-diff	0	(log.f64 (fma.f64 im im (*.f64 re re)))
cost-diff	0	(.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64))
cost-diff	0	(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
cost-diff	0	(log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
cost-diff	0	(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
cost-diff	0	#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	#s(approx (sqrt (+ (* re re) (* im im))) im)
cost-diff	0	(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
cost-diff	0	(neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
cost-diff	0	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	47	342
0	78	338
1	125	338
2	243	338
3	599	338
4	1445	338
5	2239	338
6	4129	338
0	8365	322

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Calls

Call 1

Inputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(/.f64 re im)
re
im
(*.f64 #s(literal 2 binary64) (log.f64 im))
#s(literal 2 binary64)
(log.f64 im)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
#s(literal 1/2 binary64)
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
(+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))
(pow.f64 im #s(literal 6 binary64))
im
#s(literal 6 binary64)
(pow.f64 re #s(literal 6 binary64))
re
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (*.f64 im re) #s(literal 2 binary64))
(*.f64 im re)
#s(literal 2 binary64)
(pow.f64 im #s(literal 4 binary64))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
(.f64 (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))
im
(*.f64 re re)
re
#s(literal -1/2 binary64)
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)

Outputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
im
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
(.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(/.f64 re im)
re
im
(*.f64 #s(literal 2 binary64) (log.f64 im))
(*.f64 (log.f64 im) #s(literal 2 binary64))
#s(literal 2 binary64)
(log.f64 im)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #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)))))))
(.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(.f64 (-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
(log.f64 (+.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 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(pow.f64 im #s(literal 6 binary64))
im
#s(literal 6 binary64)
(pow.f64 re #s(literal 6 binary64))
re
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 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)))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 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 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
#s(literal 4 binary64)
(pow.f64 (*.f64 im re) #s(literal 2 binary64))
(*.f64 im re)
#s(literal 2 binary64)
(pow.f64 im #s(literal 4 binary64))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
(.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (log.f64 (fma.f64 im im (.f64 re re))))
(.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))))
(log.f64 (fma.f64 im im (*.f64 re re)))
(fma.f64 im im (*.f64 re re))
im
(*.f64 re re)
re
#s(literal -1/2 binary64)
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)

localize210.0ms (3.7%)

Memory

-26.3MiB live, 164.8MiB allocated; 12ms collecting garbage

Localize:

Found 16 expressions of interest:

New	Metric	Score
accuracy	0.0	(*.f64 re re)
accuracy	0.6409950683790943	(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
accuracy	1.0	(log.f64 #s(literal 1/10 binary64))
accuracy	34.997565789526945	(log.f64 (fma.f64 im im (*.f64 re re)))
accuracy	11.503811298189481	(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
accuracy	17.933593750000004	(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
accuracy	48.18350832391889	(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
accuracy	51.81485569965931	(log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
accuracy	0.0	(log.f64 #s(literal 10 binary64))
accuracy	0.0078125	(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
accuracy	0.2127735534061987	#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
accuracy	0.6409950683790943	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
accuracy	0.0	(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
accuracy	0.5693630984369682	#s(approx (sqrt (+ (* re re) (* im im))) im)
accuracy	0.6409950683790943	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
accuracy	1.0	(log.f64 #s(literal 1/10 binary64))

Samples

132.0ms

256×

valid

Compiler

Compiled 308 to 44 computations (85.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 113.0ms

ival-log: 57.0ms (50.6% of total)

ival-mult: 21.0ms (18.7% of total)

ival-pow: 9.0ms (8% of total)

ival-div: 8.0ms (7.1% of total)

ival-add: 4.0ms (3.6% of total)

ival-hypot: 4.0ms (3.6% of total)

const: 4.0ms (3.6% of total)

ival-sub: 2.0ms (1.8% of total)

ival-pow2: 2.0ms (1.8% of total)

exact: 1.0ms (0.9% of total)

ival-neg: 1.0ms (0.9% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

series208.0ms (3.7%)

Memory

19.7MiB live, 205.7MiB allocated; 26ms collecting garbage

Counts

22 → 365

Calls

Call 1

Inputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
(.f64 (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))
(log.f64 #s(literal 1/10 binary64))
(log.f64 #s(literal 10 binary64))
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (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 re re)

Outputs
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (log im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (* -1/2 (log (pow im 2)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (* -1/2 (log (pow im 2))) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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 (* (log (+ (* im im) (* re re))) -1/2) #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 (+ (* 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 (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 2) (- (pow re 2) (pow im 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ 1 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/6 (/ (pow im 6) (pow re 6))) (* 1/4 (/ (pow im 4) (pow re 4))))))))
#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 (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ -1 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/6 (/ (pow im 6) (pow re 6))) (* 1/4 (/ (pow im 4) (pow re 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (* -1/2 (log (pow re 2)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (* -1/2 (log (pow re 2))) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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 (* (log (+ (* im im) (* re re))) -1/2) #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 (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ 1 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (+ (* -1/6 (/ (pow re 6) (pow im 6))) (* 1/4 (/ (pow re 4) (pow im 4))))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 2)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ -1 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (+ (* -1/6 (/ (pow re 6) (pow im 6))) (* 1/4 (/ (pow re 4) (pow im 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))

Calls

6 calls:

Time	Variable		Point	Expression
61.0ms	re	@	0	((/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (neg (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (* (log (+ (* im im) (* re re))) -1/2) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10) (log 10) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)) (* re re))
53.0ms	im	@	0	((/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (neg (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (* (log (+ (* im im) (* re re))) -1/2) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10) (log 10) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)) (* re re))
29.0ms	im	@	inf	((/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (neg (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (* (log (+ (* im im) (* re re))) -1/2) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10) (log 10) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)) (* re re))
22.0ms	re	@	-inf	((/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (neg (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (* (log (+ (* im im) (* re re))) -1/2) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10) (log 10) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)) (* re re))
21.0ms	re	@	inf	((/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (neg (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (* (log (+ (* im im) (* re re))) -1/2) (log (+ (* im im) (* re re))) (+ (* im im) (* re re)) (log 1/10) (log 10) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)) (* re re))

simplify244.0ms (4.3%)

Memory

11.0MiB live, 291.4MiB allocated; 42ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1227	13191
1	3016	12826
0	8767	11814

Stop Event

1×	iter limit
1×	node limit

Counts

365 → 365

Calls

Call 1

Inputs
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (log im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (* -1/2 (log (pow im 2)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (* -1/2 (log (pow im 2))) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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 (* (log (+ (* im im) (* re re))) -1/2) #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 (+ (* 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 (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 2) (- (pow re 2) (pow im 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ 1 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/6 (/ (pow im 6) (pow re 6))) (* 1/4 (/ (pow im 4) (pow re 4))))))))
#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 (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ -1 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/6 (/ (pow im 6) (pow re 6))) (* 1/4 (/ (pow im 4) (pow re 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (* -1/2 (log (pow re 2)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (* -1/2 (log (pow re 2))) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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 (* (log (+ (* im im) (* re re))) -1/2) #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 (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ 1 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (+ (* -1/6 (/ (pow re 6) (pow im 6))) (* 1/4 (/ (pow re 4) (pow im 4))))))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 2)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) #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 (+ (* 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 (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ -1 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (+ (* -1/6 (/ (pow re 6) (pow im 6))) (* 1/4 (/ (pow re 4) (pow im 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))

Outputs
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log im) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1 (/ (log im) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 re re)) (.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) im) im))) (.f64 re re) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (.f64 re re)) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) im) im))) (*.f64 re re) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (log im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (neg.f64 (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (log im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (neg.f64 (log.f64 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) (-.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 re re)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re)) (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (neg (log (sqrt (+ (* re re) (* im im))))) (-.f64 (.f64 (-.f64 (.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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re)) (log.f64 im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (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)))) #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)))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re) (log.f64 im)))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.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 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re) (log.f64 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) 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))) (fma.f64 (/.f64 (*.f64 re re) im) #s(literal 1/2 binary64) 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))) (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))) #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 (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 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)))) (log 10)) #s(hole binary64 (* 1/2 (/ (log (pow im 2)) (log 10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (log 10)) (fma.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (*.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (.f64 (log.f64 (.f64 im im)) #s(literal 1/2 binary64)))
#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)))) (.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im)))))
#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)))) (fma.f64 (log.f64 (.f64 im 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 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (.f64 im im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.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 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (*.f64 im im)))
#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))) (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (*.f64 im im))))
#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))) (fma.f64 (fma.f64 (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (.f64 im im))))
#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 (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.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) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (.f64 im im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (log im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) re) re (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) (.f64 re re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (pow.f64 im #s(literal 6 binary64)))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (pow.f64 im #s(literal 6 binary64)))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.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) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) (log.f64 (pow.f64 im #s(literal 6 binary64))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64)) (log.f64 (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 (log (+ (pow im 6) (pow re 6))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 18 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal 12 binary64)))) (pow.f64 re #s(literal 6 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64)) (log.f64 (pow.f64 im #s(literal 6 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64)))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 re re)) (.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (.f64 re re)) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (* -1/2 (log (pow im 2)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (.f64 (log.f64 (.f64 im im)) #s(literal -1/2 binary64)))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (* -1/2 (log (pow im 2))) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (.f64 #s(literal -1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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 (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (log.f64 (.f64 im im)) #s(literal -1/2 binary64) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 re re)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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))) -1/2) (fma.f64 (log.f64 (.f64 im im)) #s(literal -1/2 binary64) (.f64 (-.f64 (.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 #s(literal 1/2 binary64) (.f64 im im))) (*.f64 re re))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* im im) (* re re)) (*.f64 im im))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (+ (* im im) (* re re)) (fma.f64 im im (*.f64 re re)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (-.f64 (log.f64 (pow.f64 im #s(literal 4 binary64))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal 2/3 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (pow.f64 im #s(literal 4 binary64)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (fma.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (fma.f64 (.f64 (+.f64 re im) (-.f64 re im)) (.f64 re re) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 2) (- (pow re 2) (pow im 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (.f64 (.f64 (+.f64 re im) (-.f64 re im)) (*.f64 re re)))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* re re) (*.f64 re re))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/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 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (log (/ 1 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (neg.f64 (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ 1 re))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) (-.f64 (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)))) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (neg (log (sqrt (+ (* re re) (* im im))))) (-.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 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (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)))) #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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (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)))) (log.f64 re))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) 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))) (fma.f64 (.f64 re #s(literal 1/2 binary64)) (.f64 (/.f64 im re) (/.f64 im re)) re))
#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))) (fma.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)))) re re))
#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 (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (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))))) re re))
#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)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (log.f64 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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 re)))
#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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (.f64 im im) re) (/.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 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))) (fma.f64 (/.f64 im re) (/.f64 im re) (*.f64 #s(literal 2 binary64) (log.f64 re))))
#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))) (fma.f64 #s(literal 2 binary64) (log.f64 re) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#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 (+ (* im im) (* re re))) (fma.f64 #s(literal 2 binary64) (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (*.f64 #s(literal 2 binary64) (log.f64 re))) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 im (log.f64 #s(literal 10 binary64))) (/.f64 im (.f64 re re)) (/.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 (log.f64 re) (log.f64 #s(literal 10 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log.f64 re))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 re)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 1/2 binary64) re) (/.f64 (.f64 im im) re) (log.f64 re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.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)))) (log.f64 re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 #s(literal 2 binary64) (log.f64 re)))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (/.f64 im re) (/.f64 im re) (*.f64 #s(literal 2 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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))) (fma.f64 (/.f64 im re) (/.f64 im re) (.f64 #s(literal 2 binary64) (log.f64 re)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (.f64 #s(literal 2 binary64) (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))) (fma.f64 (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 (neg.f64 im) im) (*.f64 re re))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 re)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 6))) (fma.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 6 binary64) (log.f64 re) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 #s(literal 6 binary64) (log.f64 re) (fma.f64 (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ 1 re)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ 1 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (neg.f64 (log.f64 re)))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (.f64 im im) re) (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (log.f64 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/6 (/ (pow im 6) (pow re 6))) (* 1/4 (/ (pow im 4) (pow re 4))))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (.f64 im im) re) (/.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (log.f64 re))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (pow re 2)))
#s(approx (+ (* im im) (* re re)) (*.f64 re re))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (+ (* im im) (* re re)) (.f64 (fma.f64 (/.f64 im re) (/.f64 im re) #s(literal 1 binary64)) (.f64 re re)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 #s(literal 4 binary64) (log.f64 re)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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))) (fma.f64 #s(literal 4 binary64) (log.f64 re) (/.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal 4 binary64) (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))) (fma.f64 (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (*.f64 (neg.f64 (fma.f64 (/.f64 im re) (/.f64 im re) #s(literal -1 binary64))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (.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 re) (/.f64 im re))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* im re) 2)) (pow.f64 re #s(literal 4 binary64)))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (*.f64 (neg.f64 (fma.f64 (/.f64 im re) (/.f64 im re) #s(literal -1 binary64))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/720 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (log (/ -1 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (log.f64 (/.f64 #s(literal -1 binary64) re)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (* -1 (log (/ -1 re))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) (-.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (.f64 im im) re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (neg (log (sqrt (+ (* re re) (* im im))))) (-.f64 (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) (log.f64 (/.f64 #s(literal -1 binary64) 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)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#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)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#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)))) (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 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -1 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))) (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 (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 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))) (.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))) #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))) (.f64 (neg.f64 re) (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) #s(literal 1 binary64)))))
#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 (sqrt (+ (* re re) (* im im))) (neg.f64 (fma.f64 (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/16 binary64) (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))))) re re)))
#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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im 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)))) #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)))) (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 im re) (/.f64 im 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)))) #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 (* 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 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 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 (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (*.f64 (/.f64 im re) (/.f64 im re))))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#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 (+ (* 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 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64))) (.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (fma.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))) #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (*.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.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)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (*.f64 (/.f64 im re) (/.f64 im re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 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))) (fma.f64 (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 (neg.f64 im) im) (*.f64 re re))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ -1 re)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/6 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ -1 re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (log.f64 (/.f64 #s(literal -1 binary64) re)))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (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) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 re)) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/6 (/ (pow im 6) (pow re 6))) (* 1/4 (/ (pow im 4) (pow re 4))))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (+.f64 (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) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (/.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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))) (/.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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))) (fma.f64 (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 480 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (* -1 (/ (log re) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) re) re))) (.f64 im im) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (.f64 im im)) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) re) re))) (*.f64 im im) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (log re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (neg.f64 (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow im 2) (pow re 2))) (log re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 (*.f64 im im) re) (neg.f64 (log.f64 re))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* re re) (* im im))))) (-.f64 (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im)) (log.f64 re)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (neg (log (sqrt (+ (* re re) (* im im))))) (-.f64 (.f64 (-.f64 (.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 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im)) (log.f64 re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (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)))) #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)))) (fma.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) (.f64 re re))) (*.f64 im im) (log.f64 re)))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im) (log.f64 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) 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))) #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))) (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))) #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 (sqrt (+ (* re re) (* im im))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 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 (/ (* 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)) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (log 10)) (fma.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 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 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (*.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64)))
#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)))) (.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re)))))
#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)))) (fma.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64) (.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) (.f64 re re))) (*.f64 im im))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (*.f64 re re)))
#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))) (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (*.f64 re re))))
#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))) (fma.f64 (fma.f64 (/.f64 (.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 re re))) (.f64 im im) (log.f64 (.f64 re re))))
#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 (+ (* im im) (* re re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1 binary64) (.f64 re re))) (.f64 im im) (log.f64 (.f64 re re))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im)))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 im im) (log.f64 #s(literal 10 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) im) im (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 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 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) (.f64 im im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (pow.f64 re #s(literal 6 binary64)))) (log.f64 (pow.f64 re #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.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) (.f64 re re))) (.f64 im im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (pow.f64 re #s(literal 6 binary64)))) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (/.f64 (.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 re re))) (*.f64 im im) (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1 binary64) (.f64 re re))) (*.f64 im im) (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) (log.f64 (pow.f64 re #s(literal 6 binary64))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (+.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64)) (log.f64 (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 (log (+ (pow im 6) (pow re 6))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 18 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 12 binary64)))) (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64)) (log.f64 (pow.f64 re #s(literal 6 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (* -1/2 (/ (log (pow re 2)) (log 1/10)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64)))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 (pow.f64 re #s(literal 4 binary64)) (log.f64 #s(literal 1/10 binary64))))) (.f64 im im)) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (* -1/2 (log (pow re 2)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (.f64 (log.f64 (.f64 re re)) #s(literal -1/2 binary64)))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (* -1/2 (log (pow re 2))) (* -1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (.f64 #s(literal -1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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 (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (log.f64 (.f64 re re)) #s(literal -1/2 binary64) (.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #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))) -1/2) (fma.f64 (log.f64 (.f64 re re)) #s(literal -1/2 binary64) (.f64 (-.f64 (.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 #s(literal 1/2 binary64) (.f64 re re))) (*.f64 im im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (log.f64 (pow.f64 re #s(literal 4 binary64))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (-.f64 (log.f64 (pow.f64 re #s(literal 4 binary64))) (*.f64 (/.f64 im re) (/.f64 im re))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 re re))) (.f64 im im) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 (.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 2/3 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))) (*.f64 im im) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (fma.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (fma.f64 (.f64 (+.f64 im re) (-.f64 im re)) (.f64 im im) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (fma.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ 1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal -1/720 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (log (/ 1 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (neg.f64 (log.f64 im)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ 1 im))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (neg.f64 (log.f64 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* 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 (neg (log (sqrt (+ (* re re) (* im im))))) #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 (neg (log (sqrt (+ (* re re) (* im im))))) (-.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 (/.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) (log.f64 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 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)))) (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)))) #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)))) (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) (log.f64 im))))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (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))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#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))) #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))) (.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) #s(literal 1 binary64))) im))
#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 (sqrt (+ (* re re) (* im im))) (fma.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))))) im im))
#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)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (log.f64 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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 im)))
#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)))) (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) (log.f64 im))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 #s(literal 2 binary64) (log.f64 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))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#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))) (fma.f64 #s(literal 2 binary64) (log.f64 im) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
#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 (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 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 re (.f64 im im)) (/.f64 re (log.f64 #s(literal 10 binary64))) (/.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 (log.f64 im) (log.f64 #s(literal 10 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log.f64 im))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 im)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) (log.f64 im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.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)))) (log.f64 im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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) (fma.f64 (/.f64 re im) (/.f64 re im) (.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (.f64 #s(literal 2 binary64) (log.f64 im))) (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) (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 (.f64 (neg.f64 re) re) (*.f64 im im))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 6))) (fma.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal 6 binary64) (log.f64 im) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 #s(literal 6 binary64) (log.f64 im) (fma.f64 (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ 1 im)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ 1 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (neg.f64 (log.f64 im)))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (neg.f64 (log.f64 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ 1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (+ (* -1/6 (/ (pow re 6) (pow im 6))) (* 1/4 (/ (pow re 4) (pow im 4))))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (+.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64) (neg.f64 (log.f64 im)))))
#s(approx (+ (* im im) (* re re)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (+ (* im im) (* re re)) (.f64 (.f64 (fma.f64 (/.f64 re im) (/.f64 re im) #s(literal 1 binary64)) im) im))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (/.f64 (.f64 (neg.f64 re) re) (.f64 im im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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) (fma.f64 #s(literal 4 binary64) (log.f64 im) (/.f64 (.f64 (neg.f64 re) re) (*.f64 im im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (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) (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 (.f64 (neg.f64 re) re) (.f64 im im))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (*.f64 (neg.f64 (fma.f64 (/.f64 re im) (/.f64 re im) #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (.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 im) (/.f64 re im))) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 im im)) (.f64 re re)) (.f64 im im)))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) #s(hole binary64 (+ (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))) (/ (log (/ -1 im)) (log 1/10)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (neg (log (sqrt (+ (* re re) (* im im))))) (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 (+ (* re re) (* im im))))) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/720 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (log (/ -1 im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (- (* -1/2 (/ (pow re 2) (pow im 2))) (* -1 (log (/ -1 im))))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (+ (* 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) (log.f64 (/.f64 #s(literal -1 binary64) im))) (.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im))))
#s(approx (neg (log (sqrt (+ (* re re) (* im im))))) #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 (neg (log (sqrt (+ (* re re) (* im im))))) (-.f64 (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) (log.f64 (/.f64 #s(literal -1 binary64) im))) (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)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#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)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#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)))) (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 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#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 (log (sqrt (+ (* re re) (* im im)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -1 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) (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 (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 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))) (.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))) #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))) (.f64 (neg.f64 im) (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) #s(literal 1 binary64)))))
#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 (sqrt (+ (* re re) (* im im))) (neg.f64 (fma.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))))) im im)))
#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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) #s(hole binary64 (* -1 (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re 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)))) #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)))) (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 re im) (/.f64 re 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)))) #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 (* 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 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
#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 (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 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (fma.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 #s(literal -1/48 binary64) (.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(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (fma.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))) #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.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)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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) (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 (.f64 (neg.f64 re) re) (*.f64 im im))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 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 (+ (* im im) (* re re))) -1/2) (log 1/10)) #s(hole binary64 (/ (log (/ -1 im)) (log 1/10))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64))))))
#s(approx (/ (* (log (+ (* im im) (* re re))) -1/2) (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 (/ (* (log (+ (* im im) (* re re))) -1/2) (log 1/10)) (fma.f64 (/.f64 #s(literal -1/6 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (log.f64 #s(literal 1/10 binary64)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (log (/ -1 im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (log.f64 (/.f64 #s(literal -1 binary64) im)))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (* -1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (fma.f64 (/.f64 #s(literal -1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 4) (pow im 4)))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (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) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) #s(hole binary64 (+ (log (/ -1 im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (+ (* -1/6 (/ (pow re 6) (pow im 6))) (* 1/4 (/ (pow re 4) (pow im 4))))))))
#s(approx (* (log (+ (* im im) (* re re))) -1/2) (+.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) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (/.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (/.f64 (.f64 (neg.f64 re) re) (.f64 im im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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) (/.f64 (.f64 (neg.f64 re) re) (*.f64 im im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 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) (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 (.f64 (neg.f64 re) re) (.f64 im im))))))

rewrite91.0ms (1.6%)

Memory

-27.3MiB live, 118.6MiB allocated; 16ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	47	284
0	78	303
1	258	224
0	1767	188

Stop Event

1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit

Counts

22 → 261

Calls

Call 1

Inputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
(.f64 (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))
(log.f64 #s(literal 1/10 binary64))
(log.f64 #s(literal 10 binary64))
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (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 re re)

Outputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 1/10 binary64))))
(neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
(-.f64 #s(literal 0 binary64) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))
(log.f64 (pow.f64 #s(approx (sqrt (+ (* re re) (* im im))) im) #s(literal -1 binary64)))
(neg.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))))
(log.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(approx (sqrt (+ (* re re) (* im im))) im) #s(literal -1 binary64))))
(log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))
#s(approx (sqrt (+ (* re re) (* im im))) im)
(.f64 (/.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 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 (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))) (log.f64 #s(literal 10 binary64))))
(neg.f64 (/.f64 (.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 4 binary64))) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 6 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) (log.f64 im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (+.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (log.f64 im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (/.f64 re im) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (.f64 (*.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 im)))))
(/.f64 (fma.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64))))
(fma.f64 (/.f64 (neg.f64 re) (fabs.f64 im)) (/.f64 (neg.f64 re) (fabs.f64 im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fabs.f64 re) (neg.f64 im)) (/.f64 (fabs.f64 re) (neg.f64 im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fabs.f64 re) im) (/.f64 (fabs.f64 re) im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 re (fabs.f64 im)) (/.f64 re (fabs.f64 im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (fabs.f64 (/.f64 re im))) (neg.f64 (fabs.f64 (/.f64 re im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (/.f64 re im))) (fabs.f64 (fabs.f64 (/.f64 re im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (neg.f64 re) (/.f64 (neg.f64 re) (.f64 im im)) (.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 re) im) (/.f64 (neg.f64 re) im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 re) (/.f64 (fabs.f64 re) (.f64 im im)) (.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (/.f64 re im)) (fabs.f64 (/.f64 re im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (log.f64 im) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 re (/.f64 (/.f64 re im) im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 re (/.f64 re (.f64 im im)) (.f64 (log.f64 im) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (log.f64 im)))
(-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (neg.f64 (fabs.f64 (/.f64 re im))) (fabs.f64 (/.f64 re im))))
(-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 re) im) (/.f64 re im)))
(-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (/.f64 re im) (/.f64 (neg.f64 re) im)))
(+.f64 (+.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (log.f64 im)) (log.f64 im))
(+.f64 (/.f64 (pow.f64 (/.f64 re im) #s(literal 6 binary64)) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))
(+.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(+.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(+.f64 (log.f64 im) (+.f64 (log.f64 im) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (log.f64 (fma.f64 im im (.f64 re re))))
(.f64 (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 1/10 binary64))))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) (/.f64 #s(literal -1/2 binary64) (log.f64 #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 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 1/10 binary64))))
(neg.f64 (/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 10 binary64))))
(.f64 (neg.f64 (log.f64 (fma.f64 im im (.f64 re re)))) #s(literal -1/2 binary64))
(.f64 #s(literal -1/2 binary64) (neg.f64 (log.f64 (fma.f64 im im (.f64 re re)))))
(.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))))
(/.f64 (.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (.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 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (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 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (.f64 #s(literal 1/2 binary64) (-.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 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)))) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64))))
(neg.f64 (neg.f64 (log.f64 (hypot.f64 im re))))
(log.f64 (hypot.f64 im re))
(/.f64 (neg.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (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 (neg.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 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (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 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 2 binary64))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (-.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 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (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))))) #s(literal 2 binary64)) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (/.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 3 binary64)) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (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))))) #s(literal 3 binary64)) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 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 im) (-.f64 re im))))
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(-.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 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 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 (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 18 binary64)) (pow.f64 im #s(literal 18 binary64)))) (log.f64 (-.f64 (+.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (pow.f64 (*.f64 im re) #s(literal 6 binary64)))))
(log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (log.f64 (fma.f64 im im (.f64 re re))))
(.f64 (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (fma.f64 im im (.f64 re re))) (log.f64 #s(literal 1/10 binary64))))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) (/.f64 #s(literal -1/2 binary64) (log.f64 #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 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(neg.f64 (/.f64 (log.f64 (hypot.f64 im re)) (log.f64 #s(literal 1/10 binary64))))
(neg.f64 (/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 10 binary64))))
(.f64 (neg.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))))
(.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64))
(.f64 #s(literal 1/2 binary64) (neg.f64 (log.f64 (fma.f64 im im (.f64 re re)))))
(neg.f64 (log.f64 (hypot.f64 im re)))
(log.f64 (pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal -1/2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (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 (neg.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 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (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 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 2 binary64))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (-.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 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (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))))) #s(literal 2 binary64)) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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 (/.f64 (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 3 binary64)) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (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))))) #s(literal 3 binary64)) (fma.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (log.f64 (.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (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)))))) (pow.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) #s(literal 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 im) (-.f64 re im))))
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(-.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 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 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 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64)))) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(.f64 (/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64)))) (fma.f64 (pow.f64 im #s(literal 4 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)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (.f64 (neg.f64 re) re)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (neg.f64 im) im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #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 im) (-.f64 re im)))
(/.f64 (-.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 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))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (+.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) (.f64 (-.f64 (+.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (pow.f64 (.f64 im 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 (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 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (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 (neg.f64 (neg.f64 re)) re))
(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 (neg.f64 (neg.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 (neg.f64 (neg.f64 im)) im))
(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 (neg.f64 (neg.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 (neg.f64 (neg.f64 re)) re))
(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 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 im im))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 re re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 im im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 re im) (-.f64 re im))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 re im) (-.f64 re im))))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 re)) (neg.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(+.f64 (/.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 (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 (/.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 (neg.f64 (neg.f64 re)) re))
(+.f64 (.f64 im im) (.f64 re re))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(neg.f64 (log.f64 #s(literal 10 binary64)))
(log.f64 #s(literal 1/10 binary64))
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 10 binary64))
(-.f64 (log.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64)))) (log.f64 (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64)))) (log.f64 (fma.f64 (pow.f64 im #s(literal 4 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)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(log.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (.f64 (-.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 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 (pow.f64 re #s(literal 12 binary64)) (pow.f64 (-.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 8 binary64)) (fma.f64 (-.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64)))) (neg.f64 (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64)))) (neg.f64 (fma.f64 (pow.f64 im #s(literal 4 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)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64))) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64))) (+.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 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 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 (pow.f64 im #s(literal 4 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)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (neg.f64 im)) (neg.f64 im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (fabs.f64 im)) (fabs.f64 im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (fma.f64 re re (.f64 im re)) (-.f64 (.f64 re re) (*.f64 im re)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (.f64 (neg.f64 im) (fabs.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) (neg.f64 im)) (.f64 (fabs.f64 im) (neg.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) im) (.f64 (fabs.f64 im) im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im (fabs.f64 im)) (.f64 im (fabs.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) im (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (neg.f64 im) (.f64 (neg.f64 im) (.f64 im im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (.f64 im im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im im) (.f64 im im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 im (pow.f64 im #s(literal 3 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 re re) (.f64 (+.f64 re im) (-.f64 re im)) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (pow.f64 im #s(literal 4 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)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 12 binary64)) (fma.f64 (pow.f64 im #s(literal 4 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)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) #s(literal 2 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 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(.f64 (fma.f64 re re (.f64 im re)) (-.f64 (.f64 re re) (.f64 im re)))
(.f64 (.f64 re re) (*.f64 (+.f64 re im) (-.f64 re im)))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (.f64 im re) #s(literal 4 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 (.f64 im re) #s(literal 6 binary64)))) (neg.f64 (+.f64 (fma.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (.f64 im re) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 (.f64 im re) #s(literal 6 binary64))) (+.f64 (fma.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (neg.f64 re) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (neg.f64 re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (fabs.f64 re) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (fabs.f64 re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (fabs.f64 re) re) (.f64 (fabs.f64 re) re) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 (fabs.f64 re) re) (.f64 (fabs.f64 re) re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 re (fabs.f64 re)) (.f64 re (fabs.f64 re)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 re (fabs.f64 re)) (.f64 re (fabs.f64 re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) re (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) re (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (neg.f64 re) (.f64 (neg.f64 re) (.f64 re re)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (neg.f64 re) (.f64 (neg.f64 re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (.f64 re re)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 re re) (.f64 re re) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 re (pow.f64 re #s(literal 3 binary64)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(fma.f64 re (pow.f64 re #s(literal 3 binary64)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(-.f64 (/.f64 (pow.f64 re #s(literal 8 binary64)) (+.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (pow.f64 (.f64 im re) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (+.f64 (fma.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))) (/.f64 (pow.f64 (.f64 im re) #s(literal 6 binary64)) (+.f64 (fma.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 im re)) (*.f64 im re)))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(*.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 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) 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 re #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 re) re))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))

eval80.0ms (1.4%)

Memory: 55.2MiB live, 185.7MiB allocated; 20ms collecting garbage
Compiler: Compiled 20 997 to 2 785 computations (86.7% saved)

prune49.0ms (0.9%)

Memory

-13.1MiB live, 61.0MiB allocated; 34ms collecting garbage

Pruning

11 alts after pruning (7 fresh and 4 done)

	Pruned	Kept	Total
New	588	7	595
Fresh	0	0	0
Picked	1	3	4
Done	2	1	3
Total	591	11	602

Accuracy

99.8%

Counts

602 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	44.9%	(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
	16.4%	(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
▶	22.1%	(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
▶	16.1%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
▶	98.8%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓	98.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
	98.6%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (/.f64 (fma.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
▶	45.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
▶	3.5%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
✓	98.5%	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
✓	98.4%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))

Compiler

Compiled 566 to 400 computations (29.3% saved)

simplify161.0ms (2.9%)

Memory

30.6MiB live, 226.4MiB allocated; 58ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
cost-diff	0	(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	(-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
cost-diff	0	#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
cost-diff	0	#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
cost-diff	0	#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))))
cost-diff	0	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
cost-diff	0	(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
cost-diff	0	#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
cost-diff	1	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	737
0	113	737
1	177	737
2	343	736
3	927	736
4	3316	736
0	8288	727

Stop Event

1×	iter limit
1×	node limit
1×	iter limit

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(/.f64 re im)
re
im
(*.f64 #s(literal 2 binary64) (log.f64 im))
#s(literal 2 binary64)
(log.f64 im)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
(*.f64 (/.f64 re im) (/.f64 re im))
(/.f64 re im)
re
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
(.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))
(fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(/.f64 #s(literal 2 binary64) re)
#s(literal 2 binary64)
re
(/.f64 (log.f64 im) re)
(log.f64 im)
im
(/.f64 #s(literal 1 binary64) (*.f64 im im))
#s(literal 1 binary64)
(*.f64 im im)
(*.f64 re re)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(literal 1/2 binary64)
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
(log.f64 (pow.f64 im #s(literal 6 binary64)))
(pow.f64 im #s(literal 6 binary64))
im
#s(literal 6 binary64)
(log.f64 (pow.f64 im #s(literal 4 binary64)))
(pow.f64 im #s(literal 4 binary64))
#s(literal 4 binary64)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
#s(literal 1/2 binary64)
(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
(*.f64 #s(literal 6 binary64) (log.f64 im))
#s(literal 6 binary64)
(log.f64 im)
im
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
re
#s(literal 4 binary64)
(pow.f64 (*.f64 im re) #s(literal 2 binary64))
(*.f64 im re)
#s(literal 2 binary64)
(pow.f64 im #s(literal 4 binary64))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)

Outputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 (/.f64 re im) im) re (*.f64 (log.f64 im) #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
(.f64 #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 (/.f64 re im) im) re (*.f64 (log.f64 im) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 (/.f64 re im) im) re (*.f64 (log.f64 im) #s(literal 2 binary64))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(fma.f64 (/.f64 (/.f64 re im) im) re (*.f64 (log.f64 im) #s(literal 2 binary64)))
(/.f64 re im)
re
im
(*.f64 #s(literal 2 binary64) (log.f64 im))
(*.f64 (log.f64 im) #s(literal 2 binary64))
#s(literal 2 binary64)
(log.f64 im)
(neg.f64 (log.f64 #s(literal 1/10 binary64)))
(log.f64 #s(literal 1/10 binary64))
#s(literal 1/10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))))
(.f64 #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im))
(*.f64 (/.f64 re im) (/.f64 re im))
(/.f64 (*.f64 (/.f64 re im) re) im)
(/.f64 re im)
re
im
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) re) re) (log.f64 im) (/.f64 #s(literal 1 binary64) (*.f64 im im)))))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))))
(.f64 #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) re) re) (log.f64 im) (/.f64 #s(literal 1 binary64) (*.f64 im im)))))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) re) re) (log.f64 im) (/.f64 #s(literal 1 binary64) (*.f64 im im))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) re) re) (log.f64 im) (/.f64 #s(literal 1 binary64) (*.f64 im im)))))
(.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))
(.f64 (.f64 re re) (fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) re) re) (log.f64 im) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
(fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(fma.f64 (/.f64 (/.f64 #s(literal 2 binary64) re) re) (log.f64 im) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(/.f64 #s(literal 2 binary64) re)
#s(literal 2 binary64)
re
(/.f64 (log.f64 im) re)
(log.f64 im)
im
(/.f64 #s(literal 1 binary64) (*.f64 im im))
#s(literal 1 binary64)
(*.f64 im im)
(*.f64 re re)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
(log.f64 (pow.f64 im #s(literal 6 binary64)))
(pow.f64 im #s(literal 6 binary64))
im
#s(literal 6 binary64)
(log.f64 (pow.f64 im #s(literal 4 binary64)))
(pow.f64 im #s(literal 4 binary64))
#s(literal 4 binary64)
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
(*.f64 #s(literal 6 binary64) (log.f64 im))
#s(literal 6 binary64)
(log.f64 im)
im
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(pow.f64 re #s(literal 4 binary64))
re
#s(literal 4 binary64)
(pow.f64 (*.f64 im re) #s(literal 2 binary64))
(pow.f64 (*.f64 re im) #s(literal 2 binary64))
(*.f64 im re)
(*.f64 re im)
#s(literal 2 binary64)
(pow.f64 im #s(literal 4 binary64))
(log.f64 #s(literal 10 binary64))
#s(literal 10 binary64)

localize225.0ms (4%)

Memory

-28.4MiB live, 404.8MiB allocated; 115ms collecting garbage

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.9574130861065218	(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
accuracy	11.503811298189481	(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
accuracy	17.933593750000004	(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
accuracy	48.18350832391889	(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
accuracy	0.6409950683790943	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
accuracy	0.9681743654118479	(-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
accuracy	48.18350832391514	(log.f64 (pow.f64 im #s(literal 4 binary64)))
accuracy	51.81485569965931	(log.f64 (pow.f64 im #s(literal 6 binary64)))
accuracy	0.6409950683790943	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
accuracy	0.7421182340864954	(/.f64 #s(literal 1 binary64) (*.f64 im im))
accuracy	4.703076145124729	(fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
accuracy	33.63882008778805	(.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))
accuracy	0.2127735534061987	#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))
accuracy	0.236660009768442	(*.f64 (/.f64 re im) (/.f64 re im))
accuracy	0.6409950683790943	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
accuracy	61.74355224062151	#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
accuracy	0.0078125	(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
accuracy	0.2127735534061987	#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
accuracy	0.6409950683790943	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
accuracy	1.0	(log.f64 #s(literal 1/10 binary64))

Samples

125.0ms

256×

valid

Compiler

Compiled 482 to 50 computations (89.6% saved)

Precisions

Click to see histograms. Total time spent on operations: 72.0ms

ival-log: 19.0ms (26.4% of total)

ival-mult: 15.0ms (20.8% of total)

ival-div: 11.0ms (15.3% of total)

ival-pow: 10.0ms (13.9% of total)

ival-add: 5.0ms (6.9% of total)

const: 4.0ms (5.6% of total)

ival-sub: 3.0ms (4.2% of total)

ival-pow2: 3.0ms (4.2% of total)

exact: 1.0ms (1.4% of total)

ival-neg: 1.0ms (1.4% of total)

adjust: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

ival-true: 0.0ms (0% of total)

series140.0ms (2.5%)

Memory

8.4MiB live, 336.2MiB allocated; 42ms collecting garbage

Counts

30 → 270

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))))
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
(log.f64 #s(literal 1/10 binary64))
(*.f64 (/.f64 re im) (/.f64 re im))
(.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))
(fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (*.f64 im im))
(log.f64 (pow.f64 im #s(literal 6 binary64)))
(log.f64 (pow.f64 im #s(literal 4 binary64)))
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))

Outputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* 1/4 (/ (pow re 2) (* (pow im 4) (log 1/10)))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (pow re 2) (- (* (pow re 2) (+ (* -1/6 (/ (pow re 2) (* (pow im 6) (log 1/10)))) (* 1/4 (/ 1 (* (pow im 4) (log 1/10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 1/10)))))))))
#s(approx (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (log im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (/ re im) (/ re im)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* 2 (log im))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* 2 (/ (log im) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ (+ (* 2 (log im)) (/ (pow re 2) (pow im 2))) (pow re 2))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 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 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ 1 (pow im 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (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 (+ (* 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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* 6 (log im)) (* 4 (log im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ (+ 1 (* 2 (/ (* (pow im 2) (log im)) (pow re 2)))) (pow im 2))))
#s(approx (/ 1 (* im im)) #s(hole binary64 (/ 1 (pow im 2))))
#s(approx (log (pow im 6)) #s(hole binary64 (* 6 (log im))))
#s(approx (log (pow im 4)) #s(hole binary64 (* 4 (log im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* -2 (/ (log (/ 1 im)) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* -2 (/ (log (/ 1 im)) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (log (pow im 6)) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (pow im 4)) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* 2 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* 2 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (log (pow im 6)) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (pow im 4)) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))

Calls

6 calls:

Time	Variable		Point	Expression
33.0ms	im	@	-inf	((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (- (log (pow im 6)) (log (pow im 4))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (log 1/10) (* (/ re im) (/ re im)) (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/ 1 (* im im)) (log (pow im 6)) (log (pow im 4)) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)))
29.0ms	im	@	inf	((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (- (log (pow im 6)) (log (pow im 4))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (log 1/10) (* (/ re im) (/ re im)) (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/ 1 (* im im)) (log (pow im 6)) (log (pow im 4)) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)))
28.0ms	im	@	0	((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (- (log (pow im 6)) (log (pow im 4))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (log 1/10) (* (/ re im) (/ re im)) (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/ 1 (* im im)) (log (pow im 6)) (log (pow im 4)) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)))
16.0ms	re	@	0	((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (- (log (pow im 6)) (log (pow im 4))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (log 1/10) (* (/ re im) (/ re im)) (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/ 1 (* im im)) (log (pow im 6)) (log (pow im 4)) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)))
14.0ms	re	@	-inf	((/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (log (+ (* im im) (* re re)))) (log 10)) (* 1/2 (log (+ (* im im) (* re re)))) (log (+ (* im im) (* re re))) (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (- (log (pow im 6)) (log (pow im 4))) (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (log (+ (pow im 6) (pow re 6))) (log 1/10) (* (/ re im) (/ re im)) (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/ 1 (* im im)) (log (pow im 6)) (log (pow im 4)) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (- (pow re 4) (pow (* im re) 2)))

simplify322.0ms (5.7%)

Memory

-9.4MiB live, 331.5MiB allocated; 130ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	947	10087
1	2334	9730
0	8431	9356

Stop Event

1×	iter limit
1×	node limit

Counts

270 → 270

Calls

Call 1

Inputs
#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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (log im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (/ re im) (/ re im)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* 2 (log im))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* 2 (/ (log im) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ (+ (* 2 (log im)) (/ (pow re 2) (pow im 2))) (pow re 2))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 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 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ 1 (pow im 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (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 (+ (* 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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (+ (* 1/2 (/ (- (pow im 6) (* 1/720 (+ (* -240 (pow im 6)) (* 720 (pow im 6))))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (/ (* 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* 6 (log im)) (* 4 (log im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ (+ 1 (* 2 (/ (* (pow im 2) (log im)) (pow re 2)))) (pow im 2))))
#s(approx (/ 1 (* im im)) #s(hole binary64 (/ 1 (pow im 2))))
#s(approx (log (pow im 6)) #s(hole binary64 (* 6 (log im))))
#s(approx (log (pow im 4)) #s(hole binary64 (* 4 (log im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* -2 (/ (log (/ 1 im)) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* -2 (/ (log (/ 1 im)) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (log (pow im 6)) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (pow im 4)) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 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 (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (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 (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (+ (* 1/2 (/ (- (pow re 6) (* 1/720 (+ (* -240 (pow re 6)) (* 720 (pow re 6))))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* 2 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* 2 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (log (pow im 6)) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (pow im 4)) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))

Outputs
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (* -1/2 (/ (log (pow im 2)) (log 1/10)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* -1/2 (/ (pow re 2) (* (pow im 2) (log 1/10)))))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (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))) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 re re)) (.f64 (log.f64 #s(literal 1/10 binary64)) (pow.f64 im #s(literal 4 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #s(hole binary64 (+ (* -1/2 (/ (log (pow im 2)) (log 1/10))) (* (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)))) (neg (log 1/10))) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 1/10 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 re re)) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (*.f64 im im)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#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)))) (.f64 (log.f64 (.f64 im im)) #s(literal 1/2 binary64)))
#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)))) (.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im)))))
#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)))) (fma.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) (.f64 im im))) (.f64 re re) (.f64 (log.f64 (*.f64 im im)) #s(literal 1/2 binary64))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re) (.f64 (log.f64 (*.f64 im im)) #s(literal 1/2 binary64))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow im 2))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (*.f64 im im)))
#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))) (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (*.f64 im im))))
#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))) (fma.f64 (fma.f64 (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (.f64 im im))))
#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 (log (+ (* im im) (* re re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.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) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (.f64 im im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (log im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64))))
#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)) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (.f64 im im))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (log 10)) (fma.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) (.f64 re re) (.f64 (/.f64 (log.f64 (*.f64 im im)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow im 6)) (log (pow im 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 re re) (log.f64 #s(literal 10 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) re) re (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 re re) (pow.f64 im #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) im) im))) (.f64 re re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow im 6)) (log (pow im 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (pow.f64 im #s(literal 6 binary64)))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow im 6)) (log (pow im 4)))) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.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) (.f64 im im))) (.f64 re re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.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 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow im 6)) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (/ (pow re 2) (pow im 2))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (log.f64 (pow.f64 im #s(literal 6 binary64)))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* -1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (/.f64 (.f64 re re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow im 6)) (* (pow re 2) (+ (* (pow re 2) (- (* 1/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2))))) (log (pow im 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.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) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow im 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) (log.f64 (pow.f64 im #s(literal 6 binary64))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow im 6)) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64)) (log.f64 (pow.f64 im #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 (log (+ (pow im 6) (pow re 6))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 18 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal 12 binary64)))) (pow.f64 re #s(literal 6 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 6 binary64)))) (pow.f64 re #s(literal 6 binary64)) (log.f64 (pow.f64 im #s(literal 6 binary64)))))
#s(approx (* (/ re im) (/ re im)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (* (/ re im) (/ re im)) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* 2 (log im))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* 2 (log im)) (/ (pow re 2) (pow im 2)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* 2 (/ (log im) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ (+ (* 2 (log im)) (/ (pow re 2) (pow im 2))) (pow re 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (.f64 (log.f64 im) #s(literal 2 binary64))) (.f64 re re)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow im 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (-.f64 (log.f64 (pow.f64 im #s(literal 4 binary64))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* 1/2 (/ (pow re 2) (pow im 4))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow im 4)) (* (pow re 2) (- (* (pow re 2) (+ (* 2/3 (/ (pow re 2) (pow im 6))) (* 1/2 (/ 1 (pow im 4))))) (/ 1 (pow im 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal 2/3 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow im 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (pow.f64 im #s(literal 4 binary64)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (fma.f64 (.f64 (+.f64 re im) (-.f64 re im)) (.f64 re re) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (neg.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 2) (- (pow re 2) (pow im 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (.f64 (.f64 (+.f64 re im) (-.f64 re im)) (*.f64 re re)))
#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))) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 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))) #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)))) (neg (log 1/10))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 re re)) (/.f64 (.f64 im im) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal -1/6 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 re)) (log.f64 #s(literal 1/10 binary64)))))))
#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)))) (log.f64 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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 re)))
#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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 re))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (.f64 im im) re) (/.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 re)))))
#s(approx (log (+ (* im im) (* re re))) (neg.f64 (*.f64 #s(literal -2 binary64) (log.f64 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))) (fma.f64 (/.f64 im re) (/.f64 im re) (neg.f64 (*.f64 #s(literal -2 binary64) (log.f64 re)))))
#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))) (-.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (.f64 (log.f64 re) #s(literal -2 binary64))))
#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 (+ (* im im) (* re re))) (fma.f64 #s(literal -2 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
#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)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#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)) (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 (/ (* 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)) (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (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 (/ (* 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)))) (log 10)) (+.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 im (log.f64 #s(literal 10 binary64))) (/.f64 im (.f64 re re)) (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 re #s(literal 6 binary64)))) (/.f64 (log.f64 re) (log.f64 #s(literal 10 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log.f64 re))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (log.f64 re)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 1/2 binary64) re) (/.f64 (.f64 im im) re) (log.f64 re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64))) (pow.f64 re #s(literal 6 binary64)))) (log.f64 re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 re))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (neg.f64 (*.f64 #s(literal -2 binary64) (log.f64 re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ 1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (/.f64 im re) (/.f64 im re) (neg.f64 (*.f64 #s(literal -2 binary64) (log.f64 re)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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))) (fma.f64 (/.f64 im re) (/.f64 im re) (neg.f64 (.f64 #s(literal -2 binary64) (log.f64 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (neg.f64 (.f64 #s(literal -2 binary64) (log.f64 re)))) (-.f64 (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 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (.f64 (/.f64 im re) (/.f64 im re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (neg.f64 (*.f64 #s(literal -6 binary64) (log.f64 re))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (*.f64 (log.f64 re) #s(literal -6 binary64))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 6))) (fma.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) #s(literal -1/2 binary64) (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (*.f64 (log.f64 re) #s(literal -6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 #s(literal -6 binary64) (neg.f64 (log.f64 re)) (fma.f64 (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (/ (pow re 2) (pow im 2))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (*.f64 (/.f64 re im) (/.f64 re im)))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* (pow re 2) (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2))))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ 1 (pow im 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* 2 (/ (log im) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (neg.f64 (*.f64 #s(literal -4 binary64) (log.f64 re))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (-.f64 (/.f64 (.f64 (neg.f64 im) im) (.f64 re re)) (*.f64 (log.f64 re) #s(literal -4 binary64))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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 (neg.f64 im) im) (.f64 re re)) (.f64 (log.f64 re) #s(literal -4 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal -4 binary64) (neg.f64 (log.f64 re)) (-.f64 (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 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (*.f64 (/.f64 im re) (/.f64 im re)))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (pow re 4)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (*.f64 (neg.f64 (fma.f64 (/.f64 im re) (/.f64 im re) #s(literal -1 binary64))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (.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 re) (/.f64 im re))) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (pow re 4)))
#s(approx (- (pow re 4) (pow (* im re) 2)) (pow.f64 re #s(literal 4 binary64)))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (*.f64 (neg.f64 (fma.f64 (/.f64 im re) (/.f64 im re) #s(literal -1 binary64))) (pow.f64 re #s(literal 4 binary64))))
#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))) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 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))) #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)))) (neg (log 1/10))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 im re) (/.f64 im re)) (fma.f64 (/.f64 #s(literal -1/6 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 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)))) #s(hole binary64 (* -1 (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im 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)))) #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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re) (fma.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/4 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#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 (* 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 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/6 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 (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 re)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (*.f64 (/.f64 im re) (/.f64 im re))))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
#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 (+ (* 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 6 binary64)) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/3 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
#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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 #s(literal -1/48 binary64) (.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(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 12 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (*.f64 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))) (+ (* 1/2 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 (/.f64 im re) (/.f64 im re)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 re))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64)))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 2) (pow re 2))) (* -4 (log (/ -1 re))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (*.f64 (/.f64 im re) (/.f64 im re))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (* -1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))) (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64) (.f64 (/.f64 im re) (/.f64 im re)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6))) (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -2 binary64))) (-.f64 (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 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (.f64 (/.f64 im re) (/.f64 im re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 re)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 re))) (+ (* -1/2 (/ (pow im 12) (pow re 12))) (+ (* 1/3 (/ (pow im 18) (pow re 18))) (/ (pow im 6) (pow re 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 im #s(literal 18 binary64)) (pow.f64 re #s(literal 18 binary64))) #s(literal 1/3 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 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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))) (/.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 re))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -240 (pow im 6)) (* 720 (pow im 6))) (pow re 6))) (* 1/24 (/ (+ (* -12 (pow im 4)) (* 24 (pow im 4))) (pow re 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal -4 binary64) (-.f64 (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 (pow.f64 im #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (*.f64 (/.f64 im re) (/.f64 im re)))))
#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))) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64)))
#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))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) (log.f64 #s(literal 1/10 binary64)))))
#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))) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (.f64 (log.f64 #s(literal 1/10 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#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)))) (neg (log 1/10))) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/6 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 1/10 binary64)) (pow.f64 re #s(literal 4 binary64))))) (.f64 im im)) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 1/10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (*.f64 re re)) (log.f64 #s(literal 1/10 binary64))) #s(literal -1/2 binary64))))
#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)))) (.f64 (log.f64 (.f64 re re)) #s(literal 1/2 binary64)))
#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)))) (.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re)))))
#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)))) (fma.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) (.f64 re re))) (.f64 im im) (.f64 (log.f64 (*.f64 re re)) #s(literal 1/2 binary64))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im) (.f64 (log.f64 (*.f64 re re)) #s(literal 1/2 binary64))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (log (pow re 2))))
#s(approx (log (+ (* im im) (* re re))) (log.f64 (*.f64 re re)))
#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))) (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (*.f64 re re))))
#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))) (fma.f64 (fma.f64 (/.f64 (.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 re re))) (.f64 im im) (log.f64 (.f64 re re))))
#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 (+ (* im im) (* re re))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1 binary64) (.f64 re re))) (.f64 im im) (log.f64 (.f64 re re))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im)))
#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)) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (.f64 re re))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#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)))) (log 10)) (fma.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64))))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) (.f64 im im) (.f64 (/.f64 (log.f64 (*.f64 re re)) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (log (pow re 6)) (log (pow re 4))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64)))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (.f64 (/.f64 im re) (/.f64 im re))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) im) im (*.f64 (/.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 im im) (pow.f64 re #s(literal 6 binary64)))) (/.f64 #s(literal 1/4 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (pow.f64 re #s(literal 4 binary64))))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 #s(literal 10 binary64)) re) re))) (.f64 im im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (log (pow re 6)) (log (pow re 4))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (pow.f64 re #s(literal 6 binary64)))) (log.f64 (pow.f64 re #s(literal 4 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (log (pow re 6)) (log (pow re 4)))) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.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) (.f64 re re))) (.f64 im im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (log (pow re 6)) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (/ (pow im 2) (pow re 2))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (fma.f64 (/.f64 im re) (/.f64 im re) (log.f64 (pow.f64 re #s(literal 6 binary64)))) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* -1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (/.f64 (.f64 im im) (pow.f64 re #s(literal 4 binary64))) #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 re re))) (*.f64 im im) (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (log (pow re 6)) (* (pow im 2) (+ (* (pow im 2) (- (* 1/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2))))) (log (pow re 4)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/3 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im) (/.f64 #s(literal 1 binary64) (.f64 re re))) (*.f64 im im) (-.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (log.f64 (pow.f64 re #s(literal 4 binary64))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* 6 (log im)) (* 4 (log im)))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (log (pow re 6))))
#s(approx (log (+ (pow im 6) (pow re 6))) (log.f64 (pow.f64 re #s(literal 6 binary64))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (log (pow re 6)) (/ (pow im 6) (pow re 6)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (+.f64 (log.f64 (pow.f64 re #s(literal 6 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64)) (log.f64 (pow.f64 re #s(literal 6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 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 (log (+ (pow im 6) (pow re 6))) (fma.f64 (fma.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 18 binary64))) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 12 binary64)))) (pow.f64 im #s(literal 6 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 6 binary64)))) (pow.f64 im #s(literal 6 binary64)) (log.f64 (pow.f64 re #s(literal 6 binary64)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (/ (+ (* 2 (* (pow im 2) (log im))) (pow re 2)) (pow im 2))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im)))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (/ (+ 1 (* 2 (/ (* (pow im 2) (log im)) (pow re 2)))) (pow im 2))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (fma.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) re) (/.f64 (log.f64 im) re) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ 1 (* im im)) #s(hole binary64 (/ 1 (pow im 2))))
#s(approx (/ 1 (* im im)) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
#s(approx (log (pow im 6)) #s(hole binary64 (* 6 (log im))))
#s(approx (log (pow im 6)) (*.f64 #s(literal 6 binary64) (log.f64 im)))
#s(approx (log (pow im 4)) #s(hole binary64 (* 4 (log im))))
#s(approx (log (pow im 4)) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (log (pow re 4))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (log.f64 (pow.f64 re #s(literal 4 binary64))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* -1 (/ (pow im 2) (pow re 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (-.f64 (log.f64 (pow.f64 re #s(literal 4 binary64))) (*.f64 (/.f64 im re) (/.f64 im re))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* 1/2 (/ (pow im 2) (pow re 4))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (.f64 re re))) (.f64 im im) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (log (pow re 4)) (* (pow im 2) (- (* (pow im 2) (+ (* 2/3 (/ (pow im 2) (pow re 6))) (* 1/2 (/ 1 (pow re 4))))) (/ 1 (pow re 2)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (-.f64 (.f64 (fma.f64 (/.f64 (.f64 im im) (pow.f64 re #s(literal 6 binary64))) #s(literal 2/3 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))) (*.f64 im im) (log.f64 (pow.f64 re #s(literal 4 binary64)))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (fma.f64 (.f64 (+.f64 im re) (-.f64 im re)) (.f64 im im) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
#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))) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 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))) #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)))) (neg (log 1/10))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (.f64 im im)) (/.f64 (.f64 re re) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 1/10 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))))
#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)))) (log.f64 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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 im)))
#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)))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (log.f64 im))))
#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 (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/4 binary64) (+.f64 (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (log (+ (* im im) (* re re))) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64))))
#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))) (fma.f64 (/.f64 re im) (/.f64 re im) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64)))))
#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))) (-.f64 (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (.f64 (log.f64 im) #s(literal -2 binary64))))
#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 (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 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (fma.f64 (/.f64 re im) (/.f64 re im) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64)))))
#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)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#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)) (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 (/ (* 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)) (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 (log.f64 im) (log.f64 #s(literal 10 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))) (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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 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 (log.f64 im) (log.f64 #s(literal 10 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 re (.f64 im im)) (/.f64 re (log.f64 #s(literal 10 binary64))) (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (*.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 im #s(literal 6 binary64)))) (/.f64 (log.f64 im) (log.f64 #s(literal 10 binary64))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log.f64 im))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 re re) im) (log.f64 im)))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) (log.f64 im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64))) (pow.f64 im #s(literal 6 binary64)))) (log.f64 im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (/.f64 re im) (/.f64 re im) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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) (fma.f64 (/.f64 re im) (/.f64 re im) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))) (-.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 (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 im #s(literal 6 binary64)))) (.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* -6 (log (/ 1 im))) (* -4 (log (/ 1 im))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (neg.f64 (*.f64 #s(literal -6 binary64) (log.f64 im))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (*.f64 (log.f64 im) #s(literal -6 binary64))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 6))) (fma.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) #s(literal -1/2 binary64) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (*.f64 (log.f64 im) #s(literal -6 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ 1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 (neg.f64 (log.f64 im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* -2 (log (/ 1 im)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* -2 (log (/ 1 im))) (/ (pow re 2) (pow im 2)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (fma.f64 (/.f64 re im) (/.f64 re im) (neg.f64 (*.f64 (log.f64 im) #s(literal -2 binary64)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* -2 (/ (log (/ 1 im)) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re)))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* -2 (/ (log (/ 1 im)) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (fma.f64 (/.f64 (neg.f64 (log.f64 im)) (.f64 re re)) #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (log (pow im 6)) #s(hole binary64 (* -6 (log (/ 1 im)))))
#s(approx (log (pow im 6)) (neg.f64 (*.f64 #s(literal -6 binary64) (log.f64 im))))
#s(approx (log (pow im 4)) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (pow im 4)) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ 1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 #s(literal 4 binary64) (log.f64 im)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (/.f64 (.f64 (neg.f64 re) re) (.f64 im im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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) (fma.f64 #s(literal 4 binary64) (log.f64 im) (/.f64 (.f64 (neg.f64 re) re) (*.f64 im im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ 1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 #s(literal 4 binary64) (log.f64 im) (-.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 (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 im #s(literal 6 binary64)))) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (*.f64 (neg.f64 (fma.f64 (/.f64 re im) (/.f64 re im) #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)) (.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 im) (/.f64 re im))) (pow.f64 im #s(literal 4 binary64))))
#s(approx (- (pow re 4) (pow (* im re) 2)) #s(hole binary64 (* (pow im 2) (- (/ (pow re 4) (pow im 2)) (pow re 2)))))
#s(approx (- (pow re 4) (pow (* im re) 2)) (.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 im im)) (.f64 re re)) (.f64 im im)))
#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))) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.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))) #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))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 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))) #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)))) (neg (log 1/10))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (fma.f64 (/.f64 #s(literal -1/6 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (/.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 1/10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 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)))) #s(hole binary64 (* -1 (log (/ -1 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)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (log (+ (* im im) (* re re)))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re 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)))) #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)))) (-.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 (/.f64 #s(literal -1 binary64) im))))
#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 (* 1/2 (log (+ (* 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 #s(literal 1/2 binary64) im) (/.f64 (.f64 re re) im) (/.f64 (.f64 #s(literal 1/6 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (log (+ (* im im) (* re re))) #s(hole binary64 (* -2 (log (/ -1 im)))))
#s(approx (log (+ (* im im) (* re re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#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))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
#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 (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 re im) (/.f64 re im) (/.f64 (*.f64 #s(literal 1/3 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64)))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (fma.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#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)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#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)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))
#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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))
#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)))) (log 10)) (+.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64))) (.f64 (/.f64 #s(literal -1/4 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 1/6 binary64) (log.f64 #s(literal 10 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) #s(hole binary64 (* 1/2 (/ (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))) (log 10)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) (neg.f64 (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))
#s(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 #s(literal -1/48 binary64) (.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(approx (/ (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (log 10)) (fma.f64 (/.f64 #s(literal -1/48 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 12 binary64)) (log.f64 #s(literal 10 binary64))) (fma.f64 (/.f64 (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (log.f64 #s(literal 10 binary64))) (/.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64)) (log.f64 #s(literal 10 binary64)))) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im))) (log.f64 #s(literal 10 binary64)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (fma.f64 (*.f64 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #s(hole binary64 (+ (* -1/48 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))) (+ (* 1/2 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 (/.f64 re im) (/.f64 re im)) #s(literal 1/2 binary64) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) #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 (* 1/2 (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))))) (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 #s(literal 1/2 binary64) (fma.f64 (/.f64 re im) (/.f64 re im) (/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64))) (pow.f64 im #s(literal 6 binary64)))) (neg.f64 (log.f64 (/.f64 #s(literal -1 binary64) im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 2) (pow im 2))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (* -1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))) (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (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) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64) (.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(hole binary64 (- (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6))) (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64))) (-.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 (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 im #s(literal 6 binary64)))) (.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) #s(hole binary64 (- (* -6 (log (/ -1 im))) (* -4 (log (/ -1 im))))))
#s(approx (- (log (pow im 6)) (log (pow im 4))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -2 binary64)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64)))
#s(approx (log (+ (pow im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (/ (pow re 6) (pow im 6)))))
#s(approx (log (+ (pow im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 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 im 6) (pow re 6))) #s(hole binary64 (+ (* -6 (log (/ -1 im))) (+ (* -1/2 (/ (pow re 12) (pow im 12))) (+ (* 1/3 (/ (pow re 18) (pow im 18))) (/ (pow re 6) (pow im 6)))))))
#s(approx (log (+ (pow im 6) (pow re 6))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64) (fma.f64 (/.f64 (pow.f64 re #s(literal 18 binary64)) (pow.f64 im #s(literal 18 binary64))) #s(literal 1/3 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 (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (* 2 (+ (log -1) (* -1 (log (/ -1 im)))))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64)))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) #s(hole binary64 (+ (* 2 (+ (log -1) (* -1 (log (/ -1 im))))) (/ (pow re 2) (pow im 2)))))
#s(approx (* (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (* re re)) (fma.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) #s(literal 2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (* 2 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (pow re 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (.f64 (/.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (.f64 re re)) #s(literal 2 binary64)))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) #s(hole binary64 (+ (* 2 (/ (+ (log -1) (* -1 (log (/ -1 im)))) (pow re 2))) (/ 1 (pow im 2)))))
#s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (fma.f64 (/.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (.f64 re re)) #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (log (pow im 6)) #s(hole binary64 (* -6 (log (/ -1 im)))))
#s(approx (log (pow im 6)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -6 binary64)))
#s(approx (log (pow im 4)) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (pow im 4)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (* -4 (log (/ -1 im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64)))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (* -1 (/ (pow re 2) (pow im 2))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (/.f64 (.f64 (neg.f64 re) re) (.f64 im im))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4)))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (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) (/.f64 (.f64 (neg.f64 re) re) (*.f64 im im)))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) #s(hole binary64 (+ (* -4 (log (/ -1 im))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* 1/720 (/ (+ (* -240 (pow re 6)) (* 720 (pow re 6))) (pow im 6))) (* 1/24 (/ (+ (* -12 (pow re 4)) (* 24 (pow re 4))) (pow im 4))))))))
#s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) im)) #s(literal -4 binary64) (-.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 (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 2/3 binary64)) (pow.f64 im #s(literal 6 binary64)))) (*.f64 (/.f64 re im) (/.f64 re im)))))

rewrite107.0ms (1.9%)

Memory

2.0MiB live, 192.9MiB allocated; 20ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	75	646
0	113	616
1	347	544
0	2424	520

Stop Event

1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit

Counts

30 → 308

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))))
#s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))))
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))))
#s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
(log.f64 #s(literal 1/10 binary64))
(*.f64 (/.f64 re im) (/.f64 re im))
(.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))
(fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (*.f64 im im))
(log.f64 (pow.f64 im #s(literal 6 binary64)))
(log.f64 (pow.f64 im #s(literal 4 binary64)))
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))

Outputs
(.f64 (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 1/10 binary64)))))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 4 binary64))) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 6 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) (log.f64 im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (+.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (log.f64 im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (log.f64 im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (log.f64 im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (+.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (.f64 (*.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 im)))))
(/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (log.f64 im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64))))
(fma.f64 (/.f64 (neg.f64 re) (fabs.f64 im)) (/.f64 (neg.f64 re) (fabs.f64 im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fabs.f64 re) (neg.f64 im)) (/.f64 (fabs.f64 re) (neg.f64 im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fabs.f64 re) im) (/.f64 (fabs.f64 re) im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 re (fabs.f64 im)) (/.f64 re (fabs.f64 im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (fabs.f64 (/.f64 re im))) (neg.f64 (fabs.f64 (/.f64 re im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (fabs.f64 (/.f64 re im))) (fabs.f64 (fabs.f64 (/.f64 re im))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (neg.f64 re) (/.f64 (neg.f64 re) (.f64 im im)) (.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 re) im) (/.f64 (neg.f64 re) im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 re) (/.f64 (fabs.f64 re) (.f64 im im)) (.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (fabs.f64 (/.f64 re im)) (fabs.f64 (/.f64 re im)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 (log.f64 im) #s(literal 2 binary64) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (log.f64 im) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 re (/.f64 (/.f64 re im) im) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 re (/.f64 re (.f64 im im)) (.f64 (log.f64 im) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (/.f64 re im) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))))
(-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (neg.f64 (log.f64 im)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (log.f64 im)))
(-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (neg.f64 (fabs.f64 (/.f64 re im))) (fabs.f64 (/.f64 re im))))
(-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 re) im) (/.f64 re im)))
(-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (/.f64 re im) (/.f64 (neg.f64 re) im)))
(+.f64 (+.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (log.f64 im)) (log.f64 im))
(+.f64 (/.f64 (pow.f64 (/.f64 re im) #s(literal 6 binary64)) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))
(+.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(+.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(+.f64 (log.f64 im) (+.f64 (log.f64 im) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
(.f64 (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (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 im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))) (log.f64 #s(literal 10 binary64))))
(neg.f64 (/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(.f64 (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))))))) (log.f64 #s(literal 10 binary64))))
(neg.f64 (/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))) #s(literal 1/2 binary64)) (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))))))
#s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))
(.f64 (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64)))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64)))) (log.f64 #s(literal 10 binary64))))
(neg.f64 (/.f64 (.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (log.f64 #s(literal 1/10 binary64))))
(.f64 #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64))))
#s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4)))) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(*.f64 (log.f64 im) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (log.f64 im))
(/.f64 (-.f64 (.f64 (log.f64 im) (log.f64 im)) (.f64 (log.f64 im) (log.f64 im))) (-.f64 (log.f64 im) (log.f64 im)))
(/.f64 (+.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64))) (fma.f64 (log.f64 im) (log.f64 im) (-.f64 (.f64 (log.f64 im) (log.f64 im)) (.f64 (log.f64 im) (log.f64 im)))))
(/.f64 (neg.f64 (.f64 (.f64 (log.f64 im) #s(literal 10 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64)))) (neg.f64 (.f64 (log.f64 im) #s(literal 10 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) (.f64 (log.f64 im) #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (log.f64 im) #s(literal 10 binary64)) (.f64 (log.f64 im) #s(literal 2 binary64))) (.f64 (log.f64 im) #s(literal 10 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) (.f64 (log.f64 im) #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64))
(fma.f64 #s(literal 6 binary64) (log.f64 im) (*.f64 #s(literal -4 binary64) (log.f64 im)))
(fma.f64 #s(literal 1 binary64) (log.f64 im) (*.f64 #s(literal 1 binary64) (log.f64 im)))
(fma.f64 (log.f64 im) #s(literal 6 binary64) (*.f64 #s(literal -4 binary64) (log.f64 im)))
(fma.f64 (log.f64 im) #s(literal 1 binary64) (*.f64 (log.f64 im) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 10 binary64))) (/.f64 (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 10 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) (.f64 (log.f64 im) #s(literal 10 binary64)) (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 3 binary64)) (fma.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) (.f64 (log.f64 im) #s(literal 10 binary64)) (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)))))
(-.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) (.f64 #s(literal 4 binary64) (log.f64 im)))
(+.f64 (.f64 #s(literal 1 binary64) (log.f64 im)) (.f64 #s(literal 1 binary64) (log.f64 im)))
(+.f64 (.f64 (log.f64 im) #s(literal 1 binary64)) (.f64 (log.f64 im) #s(literal 1 binary64)))
(+.f64 (log.f64 (neg.f64 im)) (log.f64 (neg.f64 im)))
(+.f64 (log.f64 (fabs.f64 im)) (log.f64 (fabs.f64 im)))
(+.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) (.f64 #s(literal -4 binary64) (log.f64 im)))
(+.f64 (log.f64 im) (log.f64 im))
(log.f64 (*.f64 im im))
(.f64 (/.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) (log.f64 #s(literal 10 binary64))) #s(literal 1/2 binary64))
(.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 10 binary64))))
(.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) (log.f64 #s(literal 10 binary64))))
(/.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) #s(literal 1/2 binary64)) (log.f64 #s(literal 10 binary64)))
(neg.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64))))
(neg.f64 (/.f64 (.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) #s(literal 1/2 binary64)) (log.f64 #s(literal 1/10 binary64))))
(.f64 (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(/.f64 (.f64 (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))))
(/.f64 (.f64 (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))) (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 3 binary64)))) (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))) (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))) (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))))
(/.f64 (-.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 3 binary64))) (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))) (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))))) (/.f64 (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))))))
(-.f64 (/.f64 (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 3 binary64)) (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))) (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(literal 3 binary64)) (fma.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im)))) (pow.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(literal 2 binary64)))))
(-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
#s(approx (log (+ (pow im 6) (pow re 6))) (*.f64 #s(literal 6 binary64) (log.f64 im)))
(neg.f64 (log.f64 #s(literal 10 binary64)))
(log.f64 #s(literal 1/10 binary64))
(*.f64 (/.f64 (neg.f64 re) (fabs.f64 im)) (/.f64 (neg.f64 re) (fabs.f64 im)))
(*.f64 (/.f64 (fabs.f64 re) (neg.f64 im)) (/.f64 (fabs.f64 re) (neg.f64 im)))
(*.f64 (/.f64 (fabs.f64 re) im) (/.f64 (fabs.f64 re) im))
(*.f64 (/.f64 re (fabs.f64 im)) (/.f64 re (fabs.f64 im)))
(*.f64 (neg.f64 (fabs.f64 (/.f64 re im))) (neg.f64 (fabs.f64 (/.f64 re im))))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 re im))) (fabs.f64 (fabs.f64 (/.f64 re im))))
(*.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (pow.f64 (/.f64 re im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 re im))
(.f64 (neg.f64 re) (/.f64 (neg.f64 re) (.f64 im im)))
(*.f64 (/.f64 (neg.f64 re) im) (/.f64 (neg.f64 re) im))
(.f64 (fabs.f64 re) (/.f64 (fabs.f64 re) (.f64 im im)))
(*.f64 (fabs.f64 (/.f64 re im)) (fabs.f64 (/.f64 re im)))
(*.f64 (/.f64 re im) (/.f64 re im))
(*.f64 re (/.f64 (/.f64 re im) im))
(.f64 re (/.f64 re (.f64 im im)))
(pow.f64 (/.f64 (neg.f64 re) im) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (/.f64 re im)) #s(literal 2 binary64))
(pow.f64 (/.f64 re im) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))
(/.f64 (/.f64 (*.f64 re re) (fabs.f64 im)) (fabs.f64 im))
(/.f64 (*.f64 (neg.f64 re) (/.f64 re im)) (neg.f64 im))
(/.f64 (*.f64 (/.f64 re im) (neg.f64 re)) (neg.f64 im))
(/.f64 (neg.f64 (*.f64 (/.f64 re im) re)) (neg.f64 im))
(/.f64 (*.f64 (/.f64 re im) re) im)
(/.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 im) im))
(/.f64 (.f64 re re) (.f64 im im))
(neg.f64 (*.f64 (/.f64 (neg.f64 re) im) (/.f64 re im)))
(neg.f64 (*.f64 (/.f64 re im) (/.f64 (neg.f64 re) im)))
(fabs.f64 (pow.f64 (/.f64 re im) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 re im)) #s(literal 2 binary64)))
(.f64 (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))) (neg.f64 re)) (neg.f64 re))
(.f64 (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))) (fabs.f64 re)) (fabs.f64 re))
(.f64 (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))) re) re)
(.f64 (neg.f64 re) (.f64 (neg.f64 re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))
(.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))))
(.f64 (.f64 re re) (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))))
(.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))) (.f64 re re))
(.f64 re (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64))) re))
(/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64))) (.f64 re re)) (-.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (.f64 re re)) (fma.f64 (pow.f64 im #s(literal -2 binary64)) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (/.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(/.f64 (.f64 (.f64 re re) (-.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64))))
(/.f64 (.f64 (.f64 re re) (+.f64 (pow.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64))))) (fma.f64 (pow.f64 im #s(literal -2 binary64)) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (/.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(fma.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (.f64 re re) (.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 re re)))
(fma.f64 (.f64 re re) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (.f64 (.f64 re re) (pow.f64 im #s(literal -2 binary64))))
(fma.f64 (.f64 re re) (pow.f64 im #s(literal -2 binary64)) (.f64 (.f64 re re) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))))
(fma.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 re re) (.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (.f64 re re)))
(+.f64 (.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (.f64 re re)) (.f64 (pow.f64 im #s(literal -2 binary64)) (*.f64 re re)))
(+.f64 (.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 re re)) (.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (*.f64 re re)))
(+.f64 (.f64 (.f64 re re) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (.f64 (*.f64 re re) (pow.f64 im #s(literal -2 binary64))))
(+.f64 (.f64 (.f64 re re) (pow.f64 im #s(literal -2 binary64))) (.f64 (.f64 re re) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))))
(/.f64 (-.f64 (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)))) (neg.f64 (-.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 im #s(literal -2 binary64)) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (/.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(/.f64 (fma.f64 (.f64 (/.f64 (log.f64 im) re) #s(literal 2 binary64)) im (.f64 re (pow.f64 im #s(literal -1 binary64)))) (*.f64 re im))
(/.f64 (fma.f64 (.f64 (/.f64 (log.f64 im) re) #s(literal 2 binary64)) (.f64 (neg.f64 im) im) (.f64 re #s(literal -1 binary64))) (.f64 re (*.f64 (neg.f64 im) im)))
(/.f64 (fma.f64 (.f64 (/.f64 (log.f64 im) re) #s(literal 2 binary64)) (.f64 im im) (.f64 re #s(literal 1 binary64))) (.f64 re (*.f64 im im)))
(/.f64 (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) im (.f64 (.f64 re re) (pow.f64 im #s(literal -1 binary64)))) (.f64 (*.f64 re re) im))
(/.f64 (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 (neg.f64 im) im) (.f64 (.f64 re re) #s(literal -1 binary64))) (.f64 (.f64 re re) (*.f64 (neg.f64 im) im)))
(/.f64 (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (.f64 im im) (.f64 (.f64 re re) #s(literal 1 binary64))) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 im #s(literal -1 binary64)) re (.f64 im (.f64 (/.f64 (log.f64 im) re) #s(literal 2 binary64)))) (*.f64 re im))
(/.f64 (fma.f64 (pow.f64 im #s(literal -1 binary64)) (.f64 re re) (.f64 im (.f64 (log.f64 im) #s(literal 2 binary64)))) (.f64 im (*.f64 re re)))
(/.f64 (fma.f64 #s(literal -1 binary64) re (.f64 (.f64 (neg.f64 im) im) (.f64 (/.f64 (log.f64 im) re) #s(literal 2 binary64)))) (.f64 (*.f64 (neg.f64 im) im) re))
(/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 (log.f64 im) #s(literal 2 binary64)))) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(/.f64 (fma.f64 #s(literal 1 binary64) re (.f64 (.f64 im im) (.f64 (/.f64 (log.f64 im) re) #s(literal 2 binary64)))) (.f64 (*.f64 im im) re))
(/.f64 (fma.f64 #s(literal 1 binary64) (.f64 re re) (.f64 (.f64 im im) (.f64 (log.f64 im) #s(literal 2 binary64)))) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(/.f64 (-.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)) (-.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 3 binary64)) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 (pow.f64 im #s(literal -2 binary64)) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (/.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(fma.f64 (pow.f64 (.f64 im im) #s(literal -1/2 binary64)) (pow.f64 (.f64 im im) #s(literal -1/2 binary64)) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)))
(fma.f64 (/.f64 (log.f64 im) (neg.f64 re)) (/.f64 #s(literal 2 binary64) (neg.f64 re)) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) (neg.f64 re)) (/.f64 (log.f64 im) (neg.f64 re)) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 (/.f64 (log.f64 im) (fabs.f64 re)) (/.f64 #s(literal 2 binary64) (fabs.f64 re)) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) (fabs.f64 re)) (/.f64 (log.f64 im) (fabs.f64 re)) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 (pow.f64 (neg.f64 im) #s(literal -1 binary64)) (pow.f64 (neg.f64 im) #s(literal -1 binary64)) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)))
(fma.f64 (pow.f64 (fabs.f64 im) #s(literal -1 binary64)) (pow.f64 (fabs.f64 im) #s(literal -1 binary64)) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)))
(fma.f64 (pow.f64 im #s(literal -1 binary64)) (pow.f64 im #s(literal -1 binary64)) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)))
(fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 (log.f64 im) (/.f64 #s(literal 2 binary64) (*.f64 re re)) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 #s(literal 2 binary64) (/.f64 (/.f64 (log.f64 im) re) re) (pow.f64 im #s(literal -2 binary64)))
(fma.f64 #s(literal 2 binary64) (/.f64 (log.f64 im) (*.f64 re re)) (pow.f64 im #s(literal -2 binary64)))
(-.f64 (/.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (-.f64 (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64)))) (/.f64 (pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)) (-.f64 (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64)))))
(-.f64 (pow.f64 im #s(literal -2 binary64)) (*.f64 (neg.f64 (/.f64 (log.f64 im) re)) (/.f64 #s(literal 2 binary64) re)))
(-.f64 (pow.f64 im #s(literal -2 binary64)) (*.f64 (neg.f64 (/.f64 #s(literal 2 binary64) re)) (/.f64 (log.f64 im) re)))
(+.f64 (/.f64 (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (pow.f64 im #s(literal -2 binary64)) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (/.f64 (pow.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (pow.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 3 binary64)) (fma.f64 (pow.f64 im #s(literal -2 binary64)) (-.f64 (pow.f64 im #s(literal -2 binary64)) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (/.f64 (pow.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(+.f64 (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)) (pow.f64 im #s(literal -2 binary64)))
(+.f64 (pow.f64 im #s(literal -2 binary64)) (*.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re)))
(.f64 (pow.f64 (.f64 im im) #s(literal -1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 im) #s(literal -1 binary64)) (pow.f64 (neg.f64 im) #s(literal -1 binary64)))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal -1 binary64)) (pow.f64 (fabs.f64 im) #s(literal -1 binary64)))
(*.f64 (pow.f64 im #s(literal -1 binary64)) (pow.f64 im #s(literal -1 binary64)))
(pow.f64 (*.f64 im im) #s(literal -1 binary64))
(pow.f64 im #s(literal -2 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 im)) (neg.f64 im))
(/.f64 (/.f64 #s(literal 1 binary64) (fabs.f64 im)) (fabs.f64 im))
(/.f64 (neg.f64 (pow.f64 im #s(literal -1 binary64))) (neg.f64 im))
(/.f64 (pow.f64 im #s(literal -1 binary64)) im)
(/.f64 #s(literal -1 binary64) (*.f64 (neg.f64 im) im))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 im im) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 im im))
(/.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 im im)))
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 im im)))
(neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 im) im)))
(exp.f64 (.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal 6 binary64) (log.f64 im))
(*.f64 (log.f64 im) #s(literal 6 binary64))
(+.f64 (log.f64 (pow.f64 im #s(literal 3 binary64))) (log.f64 (pow.f64 im #s(literal 3 binary64))))
(log.f64 (pow.f64 im #s(literal 6 binary64)))
(*.f64 #s(literal 4 binary64) (log.f64 im))
(*.f64 (log.f64 im) #s(literal 4 binary64))
(fma.f64 (log.f64 im) #s(literal 2 binary64) (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (log.f64 im) (*.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)))
(-.f64 (log.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64)))) (log.f64 (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (log.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64)))) (log.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (.f64 (-.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 (-.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 8 binary64)) (fma.f64 (-.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64)))) (neg.f64 (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64)))) (neg.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 im #s(literal 8 binary64))) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64))) (+.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 im #s(literal 12 binary64))) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (neg.f64 im)) (neg.f64 im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (fabs.f64 im)) (fabs.f64 im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (fma.f64 re re (.f64 re im)) (-.f64 (.f64 re re) (*.f64 re im)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (.f64 (neg.f64 im) (fabs.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) (neg.f64 im)) (.f64 (fabs.f64 im) (neg.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) im) (.f64 (fabs.f64 im) im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (.f64 im (fabs.f64 im)) (.f64 im (fabs.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) im (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (neg.f64 im) (.f64 (neg.f64 im) (.f64 im im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (.f64 im im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 (.f64 re re) (-.f64 (.f64 re re) (*.f64 im im)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 im im) (.f64 im im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(fma.f64 im (pow.f64 im #s(literal 3 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(-.f64 (+.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
(+.f64 (/.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 12 binary64)) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 2 binary64)))) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))))
(.f64 (fma.f64 re re (.f64 re im)) (-.f64 (.f64 re re) (.f64 re im)))
(.f64 (.f64 re re) (-.f64 (.f64 re re) (.f64 im im)))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (.f64 re im) #s(literal 4 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 (.f64 re im) #s(literal 6 binary64)))) (neg.f64 (+.f64 (fma.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (.f64 re im) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 (.f64 re im) #s(literal 6 binary64))) (+.f64 (fma.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (neg.f64 re) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (neg.f64 re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (fabs.f64 re) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (fabs.f64 re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (fabs.f64 re) re) (.f64 (fabs.f64 re) re) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 (fabs.f64 re) re) (.f64 (fabs.f64 re) re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 re (fabs.f64 re)) (.f64 re (fabs.f64 re)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 re (fabs.f64 re)) (.f64 re (fabs.f64 re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) re (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) re (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (neg.f64 re) (.f64 (neg.f64 re) (.f64 re re)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (neg.f64 re) (.f64 (neg.f64 re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (.f64 re re)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 (.f64 re re) (.f64 re re) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(fma.f64 re (pow.f64 re #s(literal 3 binary64)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(fma.f64 re (pow.f64 re #s(literal 3 binary64)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))
(-.f64 (/.f64 (pow.f64 re #s(literal 8 binary64)) (+.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (pow.f64 (.f64 re im) #s(literal 4 binary64)) (+.f64 (pow.f64 (*.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (+.f64 (fma.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 re im) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))) (/.f64 (pow.f64 (.f64 re im) #s(literal 6 binary64)) (+.f64 (fma.f64 (pow.f64 (.f64 re im) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 re im)) (*.f64 re im)))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (.f64 (neg.f64 im) im) (*.f64 re re)))

eval100.0ms (1.8%)

Memory: 22.2MiB live, 165.1MiB allocated; 13ms collecting garbage
Compiler: Compiled 25 710 to 2 970 computations (88.4% saved)

prune33.0ms (0.6%)

Memory

7.0MiB live, 99.1MiB allocated; 6ms collecting garbage

Pruning

25 alts after pruning (19 fresh and 6 done)

	Pruned	Kept	Total
New	558	19	577
Fresh	2	0	2
Picked	3	2	5
Done	0	4	4
Total	563	25	588

Accuracy

99.9%

Counts

588 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	44.9%	(/.f64 (.f64 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (log.f64 #s(literal 1/10 binary64)))
	98.1%	(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
	97.9%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) (.f64 (log.f64 im) #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)))))) (log.f64 #s(literal 10 binary64)))
	97.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (/.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 10 binary64))) (/.f64 (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 10 binary64)))))) (log.f64 #s(literal 10 binary64)))
✓	98.8%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓	98.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
	98.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (log.f64 im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
	42.8%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
	3.5%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
	3.6%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
	2.9%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
	45.9%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
	45.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (log.f64 im) (/.f64 #s(literal 2 binary64) (.f64 re re)) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
	30.0%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (/.f64 (fma.f64 (pow.f64 im #s(literal -1 binary64)) (.f64 re re) (.f64 im (.f64 (log.f64 im) #s(literal 2 binary64)))) (.f64 im (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
	3.5%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓	3.5%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
	45.7%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
	2.9%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
	45.6%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
	3.5%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
	3.2%	(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
	22.1%	(/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 1/10 binary64)))
✓	98.5%	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
✓	98.4%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
	98.8%	#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))

Compiler

Compiled 2 125 to 875 computations (58.8% saved)

regimes90.0ms (1.6%)

Memory

-21.7MiB live, 171.6MiB allocated; 35ms collecting garbage

Counts

35 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) 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 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (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 (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (neg.f64 (log.f64 #s(literal 1/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) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) #s(approx (log (+ (- (pow re 4) (pow (* im re) 2)) (pow im 4))) (*.f64 #s(literal 4 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (log.f64 im) (/.f64 #s(literal 2 binary64) (.f64 re re)) (pow.f64 im #s(literal -2 binary64))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
#s(approx (/ (* 1/2 (log (+ (* im im) (* re re)))) (neg (log 1/10))) (fma.f64 (/.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 1/10 binary64))) (*.f64 (/.f64 re im) (/.f64 re im)) (/.f64 (neg.f64 (log.f64 im)) (log.f64 #s(literal 1/10 binary64)))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (/.f64 (fma.f64 (pow.f64 im #s(literal -1 binary64)) (.f64 re re) (.f64 im (.f64 (log.f64 im) #s(literal 2 binary64)))) (.f64 im (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (log.f64 (pow.f64 im #s(literal 6 binary64))) (log.f64 (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal -1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (log (+ (pow im 6) (pow re 6))) (.f64 #s(literal 6 binary64) (log.f64 im))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (-.f64 (/.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 10 binary64))) (/.f64 (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 2 binary64)) (.f64 (log.f64 im) #s(literal 10 binary64)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (/.f64 (fma.f64 (pow.f64 (log.f64 im) #s(literal 3 binary64)) #s(literal 8 binary64) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (/.f64 (fma.f64 #s(literal 8 binary64) (pow.f64 (log.f64 im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 6 binary64))) (fma.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (/.f64 re im) #s(literal 2 binary64))) (pow.f64 (/.f64 re im) #s(literal 4 binary64)))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (- (log (+ (pow im 6) (pow re 6))) (log (+ (- (pow re 4) (pow ( im re) 2)) (pow im 4)))) (/.f64 (-.f64 (pow.f64 (.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 4 binary64) (log.f64 im)) (.f64 (log.f64 im) #s(literal 10 binary64)) (pow.f64 (*.f64 #s(literal 6 binary64) (log.f64 im)) #s(literal 2 binary64)))))) (log.f64 #s(literal 10 binary64)))

Outputs
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))

Calls

8 calls:

15.0ms	im
14.0ms	(*.f64 im im)
13.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
11.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
9.0ms	re

Results

Accuracy	Segments	Branch
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%	1	`re`
99.1%	1	`im`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes53.0ms (0.9%)

Memory

2.9MiB live, 103.9MiB allocated; 17ms collecting garbage

Counts

21 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) 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 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (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 (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))

Outputs
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))

Calls

8 calls:

11.0ms	re
8.0ms	(+.f64 (.f64 re re) (.f64 im im))
6.0ms	im
6.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
5.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Results

Accuracy	Segments	Branch
99.0%	1	`(*.f64 im im)`
99.0%	1	`(*.f64 re re)`
99.0%	1	`(+.f64 (.f64 re re) (.f64 im im))`
99.0%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
99.0%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
99.0%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
99.0%	1	`re`
99.0%	1	`im`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes51.0ms (0.9%)

Memory

2.9MiB live, 93.8MiB allocated; 13ms collecting garbage

Counts

20 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) 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 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (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 (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (fma.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (log.f64 im) (.f64 re re)) (.f64 im im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 (log.f64 im) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 (fma.f64 (/.f64 (log.f64 im) re) (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) (.f64 im im))) (*.f64 re re))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))

Outputs

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))

Calls

8 calls:

9.0ms	re
9.0ms	(+.f64 (.f64 re re) (.f64 im im))
6.0ms	im
5.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
5.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))

Results

Accuracy	Segments	Branch
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%	1	`re`
98.8%	1	`im`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes44.0ms (0.8%)

Memory

-17.6MiB live, 78.4MiB allocated; 17ms collecting garbage

Counts

15 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) 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 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (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 (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))

Outputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))

Calls

8 calls:

9.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
9.0ms	(*.f64 im im)
5.0ms	im
5.0ms	re
4.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))

Results

Accuracy	Segments	Branch
98.7%	1	`(*.f64 im im)`
98.7%	1	`(*.f64 re re)`
98.7%	1	`(+.f64 (.f64 re re) (.f64 im im))`
98.7%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
98.7%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
98.7%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
98.7%	1	`re`
98.7%	1	`im`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes37.0ms (0.7%)

Memory

37.7MiB live, 83.4MiB allocated; 7ms collecting garbage

Counts

14 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) 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 (log.f64 (fma.f64 im im (.f64 re re))) #s(literal -1/2 binary64)) (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 (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))) (.f64 re re))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))

Outputs
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))

Calls

8 calls:

8.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
4.0ms	re
4.0ms	im
4.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
4.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))

Results

Accuracy	Segments	Branch
98.5%	1	`(*.f64 im im)`
98.5%	1	`(*.f64 re re)`
98.5%	1	`(+.f64 (.f64 re re) (.f64 im im))`
98.5%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
98.5%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
98.5%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
98.5%	1	`re`
98.5%	1	`im`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes42.0ms (0.7%)

Memory

-0.4MiB live, 45.7MiB allocated; 6ms collecting garbage

Counts

9 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im 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:

3.0ms	re
3.0ms	im
3.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
3.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
3.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Results

Accuracy	Segments	Branch
98.4%	1	`(*.f64 im im)`
98.4%	1	`(*.f64 re re)`
98.4%	1	`(+.f64 (.f64 re re) (.f64 im im))`
98.4%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
98.4%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
98.4%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
98.4%	1	`re`
98.4%	1	`im`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes59.0ms (1%)

Memory

-33.2MiB live, 61.1MiB allocated; 16ms collecting garbage

Counts

8 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (/.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))))) (log.f64 #s(literal 10 binary64)))

Outputs

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))

Calls

8 calls:

35.0ms	re
7.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
3.0ms	im
3.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
3.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Results

Accuracy	Segments	Branch
3.6%	1	`re`
3.6%	1	`im`
3.6%	1	`(*.f64 im im)`
3.6%	1	`(*.f64 re re)`
3.6%	1	`(+.f64 (.f64 re re) (.f64 im im))`
3.6%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
3.6%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
3.6%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes17.0ms (0.3%)

Memory

41.6MiB live, 41.6MiB allocated; 0ms collecting garbage

Counts

5 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))

Outputs

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))

Calls

8 calls:

2.0ms	re
2.0ms	im
2.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
2.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
2.0ms	(*.f64 im im)

Results

Accuracy	Segments	Branch
3.5%	1	`(*.f64 im im)`
3.5%	1	`(+.f64 (.f64 re re) (.f64 im im))`
3.5%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
3.5%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
3.5%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
3.5%	1	`im`
3.5%	1	`(*.f64 re re)`
3.5%	1	`re`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes30.0ms (0.5%)

Memory

3.3MiB live, 41.1MiB allocated; 15ms collecting garbage

Counts

4 → 1

Calls

Call 1

Inputs
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (.f64 re re) (.f64 im im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 #s(approx (+ ( (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (.f64 im im))) (.f64 re re))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))

Outputs

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))

Calls

8 calls:

16.0ms	re
2.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))
2.0ms	im
2.0ms	(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
2.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Results

Accuracy	Segments	Branch
3.5%	1	`(*.f64 im im)`
3.5%	1	`(+.f64 (.f64 re re) (.f64 im im))`
3.5%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
3.5%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
3.5%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
3.5%	1	`im`
3.5%	1	`(*.f64 re re)`
3.5%	1	`re`

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes401.0ms (7.1%)

Memory

-132.5MiB live, 154.3MiB allocated; 742ms collecting garbage

Accuracy

Total -0.2b remaining (-0.3%)

Threshold costs -0.2b (-0.3%)

Counts

3 → 1

Calls

Call 1

Inputs

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 re (*.f64 im im)))))) (log.f64 #s(literal 10 binary64)))

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 re re) (*.f64 im im))))) (log.f64 #s(literal 10 binary64)))

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 #s(approx (+ (* (/ 2 re) (/ (log im) re)) (/ 1 (* im im))) (/.f64 #s(literal 1 binary64) (*.f64 im im))) (*.f64 re re))))) (log.f64 #s(literal 10 binary64)))

Outputs

(/.f64 (*.f64 #s(literal 1/2 binary64) #s(approx (log (+ (* im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 re (*.f64 im im)))))) (log.f64 #s(literal 10 binary64)))

Calls

8 calls:

18.0ms	(*.f64 re re)
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	im
1.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Results

Accuracy	Segments	Branch
3.2%	1	`(*.f64 im im)`
3.2%	1	`(+.f64 (.f64 re re) (.f64 im im))`
3.2%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
3.2%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
3.2%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
3.2%	1	`im`
3.2%	1	`(*.f64 re re)`
3.2%	1	`re`

Compiler

Compiled 44 to 38 computations (13.6% saved)

simplify58.0ms (1%)

Memory

16.3MiB live, 64.9MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	64	231
1	110	231
2	211	231
3	396	231
4	727	231
5	2163	231
6	6520	231

Stop Event

1×	node limit

Calls

Call 1

Inputs
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))

Outputs
(/.f64 (neg.f64 (log.f64 (hypot.f64 im re))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 (hypot.f64 im re)) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (.f64 (neg.f64 #s(literal 1/2 binary64)) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) (fma.f64 (/.f64 re im) (/.f64 re im) (*.f64 #s(literal 2 binary64) (log.f64 im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im))) (log.f64 #s(literal 1/10 binary64)))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (/.f64 (*.f64 (/.f64 re im) re) im)))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 (/.f64 re im) (/.f64 re im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (*.f64 re (/.f64 (/.f64 re im) im))))) (log.f64 #s(literal 10 binary64)))
(/.f64 (.f64 #s(literal 1/2 binary64) #s(approx (log (+ ( im im) (* re re))) #s(approx (+ (* (/ re im) (/ re im)) (* 2 (log im))) (.f64 re (/.f64 re (.f64 im im)))))) (log.f64 #s(literal 10 binary64)))

derivations209.0ms (3.7%)

Memory

-15.5MiB live, 227.9MiB allocated; 43ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 231 to 65 computations (71.9% saved)

preprocess156.0ms (2.8%)

Memory

6.1MiB live, 198.5MiB allocated; 18ms collecting garbage

Remove

(sort re im)

(abs re)

(abs im)

Compiler

Compiled 678 to 342 computations (49.6% saved)

end0.0ms (0%)

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

Iter	Nodes	Cost
0	24	62
1	57	62
2	107	62
3	132	62
4	170	62
0	10	12
0	17	12
1	28	12
2	67	12
3	124	12
4	161	12
0	161	7

Iter	Nodes	Cost
0	24	62
1	57	62
2	107	62
3	132	62
4	170	62
0	10	12
0	17	12
1	28	12
2	67	12
3	124	12
4	161	12
0	161	7

start0.0ms (0%)

analyze102.0ms (1.8%)

sample1.2s (21.5%)

explain127.0ms (2.3%)

preprocess19.0ms (0.3%)

eval0.0ms (0%)

prune0.0ms (0%)

simplify5.0ms (0.1%)

localize83.0ms (1.5%)

series13.0ms (0.2%)

simplify147.0ms (2.6%)

rewrite51.0ms (0.9%)

eval30.0ms (0.5%)

prune4.0ms (0.1%)

simplify6.0ms (0.1%)

localize69.0ms (1.2%)

series23.0ms (0.4%)

simplify242.0ms (4.3%)

rewrite45.0ms (0.8%)

eval63.0ms (1.1%)

prune9.0ms (0.2%)

simplify152.0ms (2.7%)

localize210.0ms (3.7%)

series208.0ms (3.7%)

simplify244.0ms (4.3%)

rewrite91.0ms (1.6%)

eval80.0ms (1.4%)

prune49.0ms (0.9%)

simplify161.0ms (2.9%)

localize225.0ms (4%)

series140.0ms (2.5%)

simplify322.0ms (5.7%)

rewrite107.0ms (1.9%)

eval100.0ms (1.8%)

prune33.0ms (0.6%)

regimes90.0ms (1.6%)

regimes53.0ms (0.9%)

regimes51.0ms (0.9%)

regimes44.0ms (0.8%)

regimes37.0ms (0.7%)

regimes42.0ms (0.7%)

regimes59.0ms (1%)

regimes17.0ms (0.3%)

regimes30.0ms (0.5%)

regimes401.0ms (7.1%)

simplify58.0ms (1%)

derivations209.0ms (3.7%)

preprocess156.0ms (2.8%)

end0.0ms (0%)

Profiling

Iter	Nodes	Cost
0	24	62
1	57	62
2	107	62
3	132	62
4	170	62
0	10	12
0	17	12
1	28	12
2	67	12
3	124	12
4	161	12
0	161	7