Metrics for math.log10 on complex, real part

start0.0ms (0%)

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

analyze56.0ms (1.5%)

Memory

-1.2MiB live, 80.8MiB allocated; 13ms 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.1s (30.1%)

Memory

6.3MiB live, 747.5MiB allocated; 870ms collecting garbage

Samples

803.0ms

8 256×

valid

Precisions

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

ival-hypot: 430.0ms (70.8% of total)

ival-log: 128.0ms (21.1% of total)

ival-div!: 48.0ms (7.9% of total)

adjust: 2.0ms (0.3% of total)

Bogosity

preprocess184.0ms (5%)

Memory

-7.4MiB live, 42.3MiB allocated; 15ms collecting garbage

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	28	74
1	97	72
2	238	72
3	387	72
4	1049	66
5	7538	66

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.2%	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))

Symmetry

(abs re)

(abs im)

(sort re im)

Compiler

Compiled 20 to 20 computations (0% saved)

series14.0ms (0.4%)

Memory

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

Counts

10 → 75

Calls

Call 1

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

Outputs
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (pow im 2)))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx re #s(hole binary64 re))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 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) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log re) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (* (pow re 4) (log 10)))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (* (pow re 6) (log 10)))) (* 1/4 (/ 1 (* (pow re 4) (log 10)))))) (* 1/2 (/ 1 (* (pow re 2) (log 10)))))) (/ (log re) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log re)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 4))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/6 (/ (pow im 2) (pow re 6))) (* 1/4 (/ 1 (pow re 4))))) (* 1/2 (/ 1 (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ -1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ -1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))

Calls

6 calls:

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

rewrite370.0ms (10.1%)

Memory

23.8MiB live, 251.5MiB allocated; 37ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	356	2499
0	366	2343
1	2432	2343
0	8696	1891
1	23562	1891

Stop Event

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

Counts

85 → 250

Calls

Call 1

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

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

eval30.0ms (0.8%)

Memory: -25.7MiB live, 63.1MiB allocated; 13ms collecting garbage
Compiler: Compiled 2 284 to 968 computations (57.6% saved)

prune7.0ms (0.2%)

Memory

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

Pruning

8 alts after pruning (8 fresh and 0 done)

	Pruned	Kept	Total
New	219	8	227
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	220	8	228

Accuracy

99.4%

Counts

228 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.2%	(/.f64 (neg.f64 (log.f64 (sqrt.f64 (fma.f64 im im (*.f64 re re))))) (log.f64 #s(literal 1/10 binary64)))
▶	99.0%	(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
▶	53.2%	(/.f64 (log.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))) (log.f64 #s(literal 10 binary64)))
▶	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))) (log.f64 #s(literal 10 binary64)))
	98.1%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
▶	10.9%	(/.f64 #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re)) (log.f64 #s(literal 10 binary64)))
▶	53.1%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (sqrt.f64 (fma.f64 im im (*.f64 re re))))))

Compiler

Compiled 168 to 168 computations (0% saved)

series96.0ms (2.6%)

Memory

15.0MiB live, 211.3MiB allocated; 46ms collecting garbage

Counts

26 → 100

Calls

Call 1

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

Outputs
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (* (pow im 4) (log 10)))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (* (pow im 6) (log 10)))) (* 1/4 (/ 1 (* (pow im 4) (log 10)))))) (* 1/2 (/ 1 (* (pow im 2) (log 10)))))) (/ (log im) (log 10)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (log im)))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* -1/4 (/ (pow re 2) (pow im 4))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (log im) (* (pow re 2) (+ (* (pow re 2) (- (* 1/6 (/ (pow re 2) (pow im 6))) (* 1/4 (/ 1 (pow im 4))))) (* 1/2 (/ 1 (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx re #s(hole binary64 re))
#s(approx (log re) #s(hole binary64 (log re)))
#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 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (/ (log 10) (log im))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log im) 2)))) (/ (log 10) (log im)))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* (pow re 2) (- (* -1 (* (pow re 2) (+ (* -1/4 (/ (log 10) (* (pow im 4) (pow (log im) 2)))) (* -1/4 (/ (log 10) (* (pow im 4) (pow (log im) 3))))))) (* 1/2 (/ (log 10) (* (pow im 2) (pow (log im) 2)))))) (/ (log 10) (log im)))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* (pow re 2) (- (* (pow re 2) (- (* -1 (* (pow re 2) (+ (* -1/2 (/ (+ (* -1/4 (/ (log 10) (* (pow im 4) (pow (log im) 2)))) (* -1/4 (/ (log 10) (* (pow im 4) (pow (log im) 3))))) (* (pow im 2) (log im)))) (+ (* 1/8 (/ (log 10) (* (pow im 6) (pow (log im) 3)))) (* 1/6 (/ (log 10) (* (pow im 6) (pow (log im) 2)))))))) (+ (* -1/4 (/ (log 10) (* (pow im 4) (pow (log im) 2)))) (* -1/4 (/ (log 10) (* (pow im 4) (pow (log im) 3))))))) (* 1/2 (/ (log 10) (* (pow im 2) (pow (log im) 2)))))) (/ (log 10) (log im)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 re)) (log 10))) (+ (* -1/4 (/ (pow im 4) (* (pow re 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (* (pow re 6) (log 10)))) (* 1/2 (/ (pow im 2) (* (pow re 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 re)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (* 1/2 (/ (pow im 2) (pow re 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 re))) (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/720 (/ (+ (* 30 (pow im 6)) (* 90 (pow im 6))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 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) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (/ (log 10) (log (/ 1 re))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* -1 (/ (log 10) (log (/ 1 re)))) (* -1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log (/ 1 re)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ 1 re)))) (* -1 (/ (+ (* -1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ 1 re)) 2))) (* 1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ 1 re)) 3)))) (pow re 4)))) (* 1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log (/ 1 re)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ 1 re)))) (* -1 (/ (+ (* -1/8 (/ (* (pow im 6) (log 10)) (pow (log (/ 1 re)) 3))) (+ (* 1/720 (/ (* (log 10) (+ (* 30 (pow im 6)) (* 90 (pow im 6)))) (pow (log (/ 1 re)) 2))) (* 1/2 (/ (* (pow im 2) (+ (* -1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ 1 re)) 2))) (* 1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ 1 re)) 3))))) (log (/ 1 re)))))) (pow re 6)))) (+ (* -1/4 (/ (* (pow im 4) (log 10)) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (+ (* 1/4 (/ (* (pow im 4) (log 10)) (* (pow re 4) (pow (log (/ 1 re)) 3)))) (* 1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log (/ 1 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 re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 re))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (/ (log 10) (log (/ -1 re))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* -1 (/ (log 10) (log (/ -1 re)))) (* -1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log (/ -1 re)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ -1 re)))) (* -1 (/ (+ (* -1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ -1 re)) 2))) (* 1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ -1 re)) 3)))) (pow re 4)))) (* 1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log (/ -1 re)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ -1 re)))) (* -1 (/ (+ (* -1/8 (/ (* (pow im 6) (log 10)) (pow (log (/ -1 re)) 3))) (+ (* 1/720 (/ (* (log 10) (+ (* 30 (pow im 6)) (* 90 (pow im 6)))) (pow (log (/ -1 re)) 2))) (* 1/2 (/ (* (pow im 2) (+ (* -1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ -1 re)) 2))) (* 1/4 (/ (* (pow im 4) (log 10)) (pow (log (/ -1 re)) 3))))) (log (/ -1 re)))))) (pow re 6)))) (+ (* -1/4 (/ (* (pow im 4) (log 10)) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (+ (* 1/4 (/ (* (pow im 4) (log 10)) (* (pow re 4) (pow (log (/ -1 re)) 3)))) (* 1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log (/ -1 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) (* 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 im) #s(hole binary64 (* -1 im)))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (/ (log 10) (log re))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow im 2) (log 10)) (* (pow re 2) (pow (log re) 2)))) (/ (log 10) (log re)))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* (pow im 2) (- (* -1 (* (pow im 2) (+ (* -1/4 (/ (log 10) (* (pow re 4) (pow (log re) 2)))) (* -1/4 (/ (log 10) (* (pow re 4) (pow (log re) 3))))))) (* 1/2 (/ (log 10) (* (pow re 2) (pow (log re) 2)))))) (/ (log 10) (log re)))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* (pow im 2) (- (* (pow im 2) (- (* -1 (* (pow im 2) (+ (* -1/2 (/ (+ (* -1/4 (/ (log 10) (* (pow re 4) (pow (log re) 2)))) (* -1/4 (/ (log 10) (* (pow re 4) (pow (log re) 3))))) (* (pow re 2) (log re)))) (+ (* 1/8 (/ (log 10) (* (pow re 6) (pow (log re) 3)))) (* 1/6 (/ (log 10) (* (pow re 6) (pow (log re) 2)))))))) (+ (* -1/4 (/ (log 10) (* (pow re 4) (pow (log re) 2)))) (* -1/4 (/ (log 10) (* (pow re 4) (pow (log re) 3))))))) (* 1/2 (/ (log 10) (* (pow re 2) (pow (log re) 2)))))) (/ (log 10) (log 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)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10))))))))
#s(approx (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 im)) (log 10))) (+ (* -1/4 (/ (pow re 4) (* (pow im 4) (log 10)))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (* (pow im 6) (log 10)))) (* 1/2 (/ (pow re 2) (* (pow im 2) (log 10)))))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (* -1 (log (/ 1 im)))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (* 1/2 (/ (pow re 2) (pow im 2))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (log (sqrt (+ (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (log (/ 1 im))) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 1/720 (/ (+ (* 30 (pow re 6)) (* 90 (pow re 6))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (+ (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (/ (log 10) (log (/ 1 im))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* -1 (/ (log 10) (log (/ 1 im)))) (* -1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log (/ 1 im)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ 1 im)))) (* -1 (/ (+ (* -1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ 1 im)) 2))) (* 1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ 1 im)) 3)))) (pow im 4)))) (* 1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log (/ 1 im)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ 1 im)))) (* -1 (/ (+ (* -1/8 (/ (* (pow re 6) (log 10)) (pow (log (/ 1 im)) 3))) (+ (* 1/720 (/ (* (log 10) (+ (* 30 (pow re 6)) (* 90 (pow re 6)))) (pow (log (/ 1 im)) 2))) (* 1/2 (/ (* (pow re 2) (+ (* -1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ 1 im)) 2))) (* 1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ 1 im)) 3))))) (log (/ 1 im)))))) (pow im 6)))) (+ (* -1/4 (/ (* (pow re 4) (log 10)) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (+ (* 1/4 (/ (* (pow re 4) (log 10)) (* (pow im 4) (pow (log (/ 1 im)) 3)))) (* 1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log (/ 1 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 (+ 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 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (* -1 (/ (log 10) (log (/ -1 im))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (+ (* -1 (/ (log 10) (log (/ -1 im)))) (* -1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log (/ -1 im)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ -1 im)))) (* -1 (/ (+ (* -1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ -1 im)) 2))) (* 1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ -1 im)) 3)))) (pow im 4)))) (* 1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log (/ -1 im)) 2)))))))
#s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) #s(hole binary64 (- (+ (* -1 (/ (log 10) (log (/ -1 im)))) (* -1 (/ (+ (* -1/8 (/ (* (pow re 6) (log 10)) (pow (log (/ -1 im)) 3))) (+ (* 1/720 (/ (* (log 10) (+ (* 30 (pow re 6)) (* 90 (pow re 6)))) (pow (log (/ -1 im)) 2))) (* 1/2 (/ (* (pow re 2) (+ (* -1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ -1 im)) 2))) (* 1/4 (/ (* (pow re 4) (log 10)) (pow (log (/ -1 im)) 3))))) (log (/ -1 im)))))) (pow im 6)))) (+ (* -1/4 (/ (* (pow re 4) (log 10)) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (+ (* 1/4 (/ (* (pow re 4) (log 10)) (* (pow im 4) (pow (log (/ -1 im)) 3)))) (* 1/2 (/ (* (pow re 2) (log 10)) (* (pow im 2) (pow (log (/ -1 im)) 2)))))))))

Calls

6 calls:

Time	Variable		Point	Expression
41.0ms	re	@	-inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log re) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* im im) (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
35.0ms	re	@	0	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log re) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* im im) (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
9.0ms	re	@	inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log re) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* im im) (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
3.0ms	im	@	-inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log re) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* im im) (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))
3.0ms	im	@	inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) re im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (log re) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im) (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* im im) (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (log (sqrt (+ (* im im) (* re re)))) (sqrt (+ (* im im) (* re re))) (+ (* im im) (* re re)) (* re re))

rewrite305.0ms (8.3%)

Memory

-31.2MiB live, 212.6MiB allocated; 69ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	640	4009
0	670	3608
0	4764	3476
1	13433	3476

Stop Event

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

Counts

126 → 265

Calls

Call 1

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

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

eval20.0ms (0.6%)

Memory: 4.2MiB live, 49.1MiB allocated; 5ms collecting garbage
Compiler: Compiled 2 818 to 901 computations (68% saved)

prune9.0ms (0.2%)

Memory

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

Pruning

14 alts after pruning (9 fresh and 5 done)

	Pruned	Kept	Total
New	164	6	170
Fresh	0	3	3
Picked	0	5	5
Done	0	0	0
Total	164	14	178

Accuracy

99.6%

Counts

178 → 14

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.2%	(/.f64 (neg.f64 (log.f64 (sqrt.f64 (fma.f64 im im (*.f64 re re))))) (log.f64 #s(literal 1/10 binary64)))
✓	99.0%	(/.f64 (log.f64 (hypot.f64 re im)) (log.f64 #s(literal 10 binary64)))
✓	53.2%	(/.f64 (log.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
▶	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))) (log.f64 #s(literal 10 binary64)))
✓	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))) (log.f64 #s(literal 10 binary64)))
▶	98.1%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
✓	10.9%	(/.f64 #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re)) (log.f64 #s(literal 10 binary64)))
✓	53.1%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (sqrt.f64 (fma.f64 im im (*.f64 re re))))))
▶	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im)))))
	10.9%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re))))
	53.2%	(/.f64 #s(literal 1 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 (sqrt.f64 (fma.f64 im im (.f64 re re)))))))
▶	98.0%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 im))))
	0.0%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
	10.9%	(.f64 #s(approx (log (sqrt (+ ( re re) (* im im)))) (log.f64 re)) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))

Compiler

Compiled 299 to 299 computations (0% saved)

series210.0ms (5.7%)

Memory

-8.3MiB live, 126.6MiB allocated; 53ms collecting garbage

Counts

29 → 149

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

Calls

6 calls:

Time	Variable		Point	Expression
98.0ms	im	@	0	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) re (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/ (log 10) (log im)) (log im) (/ 1 (/ (log 10) (log (sqrt (+ (* re re) (* im im)))))) (/ (log 10) (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg 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))) (+ (* im im) (* re re)) (* re re) (log 1/10) 1/10)
56.0ms	re	@	0	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) re (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/ (log 10) (log im)) (log im) (/ 1 (/ (log 10) (log (sqrt (+ (* re re) (* im im)))))) (/ (log 10) (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg 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))) (+ (* im im) (* re re)) (* re re) (log 1/10) 1/10)
32.0ms	im	@	-inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) re (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/ (log 10) (log im)) (log im) (/ 1 (/ (log 10) (log (sqrt (+ (* re re) (* im im)))))) (/ (log 10) (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg 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))) (+ (* im im) (* re re)) (* re re) (log 1/10) 1/10)
15.0ms	im	@	inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) re (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/ (log 10) (log im)) (log im) (/ 1 (/ (log 10) (log (sqrt (+ (* re re) (* im im)))))) (/ (log 10) (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg 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))) (+ (* im im) (* re re)) (* re re) (log 1/10) 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))) im (log 10) 10 (/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) re (/ 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re)))))) 1 (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/ (log 10) (log im)) (log im) (/ 1 (/ (log 10) (log (sqrt (+ (* re re) (* im im)))))) (/ (log 10) (log (sqrt (+ (* re re) (* im im))))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg 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))) (+ (* im im) (* re re)) (* re re) (log 1/10) 1/10)

rewrite333.0ms (9.1%)

Memory

2.5MiB live, 191.4MiB allocated; 67ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	820	6201
0	848	5719
1	6095	5634
0	8314	4838
1	20726	4838

Stop Event

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

Counts

178 → 280

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

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

eval86.0ms (2.3%)

Memory: -11.1MiB live, 36.7MiB allocated; 7ms collecting garbage
Compiler: Compiled 3 895 to 1 210 computations (68.9% saved)

prune12.0ms (0.3%)

Memory

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

Pruning

23 alts after pruning (14 fresh and 9 done)

	Pruned	Kept	Total
New	222	11	233
Fresh	1	3	4
Picked	1	4	5
Done	0	5	5
Total	224	23	247

Accuracy

99.9%

Counts

247 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	0.0%	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re)))) (log.f64 #s(literal 1/10 binary64)))
▶	98.2%	(/.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)))
✓	53.2%	(/.f64 (log.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
✓	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))) (log.f64 #s(literal 10 binary64)))
✓	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))) (log.f64 #s(literal 10 binary64)))
✓	98.1%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
	0.0%	(/.f64 #s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 (neg.f64 im)))) (log.f64 #s(literal 1/10 binary64)))
▶	10.9%	(/.f64 #s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re))) (log.f64 #s(literal 1/10 binary64)))
✓	10.9%	(/.f64 #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re)) (log.f64 #s(literal 10 binary64)))
▶	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (log.f64 #s(literal 1/10 binary64))) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im)))))
✓	53.1%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (sqrt.f64 (fma.f64 im im (*.f64 re re))))))
	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re)))))
✓	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im)))))
	10.9%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re))))
	53.2%	(/.f64 #s(literal 1 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 (sqrt.f64 (fma.f64 im im (.f64 re re)))))))
	0.0%	(/.f64 #s(literal 1 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 #s(approx (sqrt (+ ( re re) (* im im))) (neg.f64 im))))))
	98.1%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/.f64 (neg.f64 (log.f64 #s(literal 1/10 binary64))) (log.f64 im))))
✓	98.0%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 im))))
	98.1%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (*.f64 (log.f64 #s(literal 10 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 im)))))
▶	0.0%	(.f64 (log.f64 #s(approx (sqrt (+ ( re re) (* im im))) (neg.f64 re))) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))
	97.6%	(.f64 (log.f64 #s(approx (sqrt (+ ( re re) (* im im))) im)) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))
▶	10.9%	(.f64 #s(approx (log (sqrt (+ ( re re) (* im im)))) (log.f64 re)) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))

Compiler

Compiled 507 to 507 computations (0% saved)

series46.0ms (1.2%)

Memory

-14.9MiB live, 72.8MiB allocated; 11ms collecting garbage

Counts

28 → 144

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

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 (neg (log re)) #s(hole binary64 (* -1 (log re))))
#s(approx (log re) #s(hole binary64 (log re)))
#s(approx re #s(hole binary64 re))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) #s(hole binary64 (/ (log im) (log 10))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (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)))) (/ 1 (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)))) (/ 1 (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 (neg re) #s(hole binary64 (* -1 re)))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (/ (log 1/10) (log im)))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1 (/ (log 1/10) (log im))) (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log im) 2)))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1 (/ (log 1/10) (log im))) (* (pow re 2) (+ (* 1/2 (/ (log 1/10) (* (pow im 2) (pow (log im) 2)))) (* (pow re 2) (+ (* -1/4 (/ (log 1/10) (* (pow im 4) (pow (log im) 2)))) (* -1/4 (/ (log 1/10) (* (pow im 4) (pow (log im) 3)))))))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1 (/ (log 1/10) (log im))) (* (pow re 2) (+ (* 1/2 (/ (log 1/10) (* (pow im 2) (pow (log im) 2)))) (* (pow re 2) (+ (* -1/4 (/ (log 1/10) (* (pow im 4) (pow (log im) 2)))) (+ (* -1/4 (/ (log 1/10) (* (pow im 4) (pow (log im) 3)))) (* (pow re 2) (+ (* -1/2 (/ (+ (* -1/4 (/ (log 1/10) (* (pow im 4) (pow (log im) 2)))) (* -1/4 (/ (log 1/10) (* (pow im 4) (pow (log im) 3))))) (* (pow im 2) (log im)))) (+ (* 1/8 (/ (log 1/10) (* (pow im 6) (pow (log im) 3)))) (* 1/6 (/ (log 1/10) (* (pow im 6) (pow (log im) 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 (+ 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 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) #s(hole binary64 (* -1 (/ (log (/ 1 re)) (log 10)))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (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)))) (/ 1 (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)))) (/ 1 (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 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (/ (log 1/10) (log (/ 1 re)))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (/ (log 1/10) (log (/ 1 re))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (+ (* 1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ 1 re)) 3)))) (+ (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (/ (log 1/10) (log (/ 1 re))))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ 1 re)) 2)))) (+ (* -1/8 (/ (* (pow im 6) (log 1/10)) (* (pow re 6) (pow (log (/ 1 re)) 3)))) (+ (* 1/720 (/ (* (log 1/10) (+ (* 30 (pow im 6)) (* 90 (pow im 6)))) (* (pow re 6) (pow (log (/ 1 re)) 2)))) (+ (* 1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ 1 re)) 3)))) (+ (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log (/ 1 re)) 2)))) (+ (* 1/2 (/ (* (pow im 2) (+ (* -1/4 (/ (* (pow im 4) (log 1/10)) (pow (log (/ 1 re)) 2))) (* 1/4 (/ (* (pow im 4) (log 1/10)) (pow (log (/ 1 re)) 3))))) (* (pow re 6) (log (/ 1 re))))) (/ (log 1/10) (log (/ 1 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)) #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 (+ 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 re)) #s(hole binary64 (* -1 (+ (log -1) (* -1 (log (/ -1 re)))))))
#s(approx (log re) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 re))))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) #s(hole binary64 (* -1 (/ (log (/ -1 re)) (log 10)))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (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)))) (/ 1 (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)))) (/ 1 (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 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (/ (log 1/10) (log (/ -1 re)))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (/ (log 1/10) (log (/ -1 re))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (+ (* 1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ -1 re)) 3)))) (+ (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (/ (log 1/10) (log (/ -1 re))))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ -1 re)) 2)))) (+ (* -1/8 (/ (* (pow im 6) (log 1/10)) (* (pow re 6) (pow (log (/ -1 re)) 3)))) (+ (* 1/720 (/ (* (log 1/10) (+ (* 30 (pow im 6)) (* 90 (pow im 6)))) (* (pow re 6) (pow (log (/ -1 re)) 2)))) (+ (* 1/4 (/ (* (pow im 4) (log 1/10)) (* (pow re 4) (pow (log (/ -1 re)) 3)))) (+ (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log (/ -1 re)) 2)))) (+ (* 1/2 (/ (* (pow im 2) (+ (* -1/4 (/ (* (pow im 4) (log 1/10)) (pow (log (/ -1 re)) 2))) (* 1/4 (/ (* (pow im 4) (log 1/10)) (pow (log (/ -1 re)) 3))))) (* (pow re 6) (log (/ -1 re))))) (/ (log 1/10) (log (/ -1 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)) #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/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) (* 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 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) #s(hole binary64 (/ (log re) (log 10))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (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)))) (/ 1 (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)))) (/ 1 (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 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (* -1 (/ (log 1/10) (log re)))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1 (/ (log 1/10) (log re))) (* 1/2 (/ (* (pow im 2) (log 1/10)) (* (pow re 2) (pow (log re) 2)))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1 (/ (log 1/10) (log re))) (* (pow im 2) (+ (* 1/2 (/ (log 1/10) (* (pow re 2) (pow (log re) 2)))) (* (pow im 2) (+ (* -1/4 (/ (log 1/10) (* (pow re 4) (pow (log re) 2)))) (* -1/4 (/ (log 1/10) (* (pow re 4) (pow (log re) 3)))))))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1 (/ (log 1/10) (log re))) (* (pow im 2) (+ (* 1/2 (/ (log 1/10) (* (pow re 2) (pow (log re) 2)))) (* (pow im 2) (+ (* -1/4 (/ (log 1/10) (* (pow re 4) (pow (log re) 2)))) (+ (* -1/4 (/ (log 1/10) (* (pow re 4) (pow (log re) 3)))) (* (pow im 2) (+ (* -1/2 (/ (+ (* -1/4 (/ (log 1/10) (* (pow re 4) (pow (log re) 2)))) (* -1/4 (/ (log 1/10) (* (pow re 4) (pow (log re) 3))))) (* (pow re 2) (log re)))) (+ (* 1/8 (/ (log 1/10) (* (pow re 6) (pow (log re) 3)))) (* 1/6 (/ (log 1/10) (* (pow re 6) (pow (log re) 2)))))))))))))))
#s(approx (neg im) #s(hole binary64 (* -1 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)) #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 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) #s(hole binary64 (* -1 (/ (log (/ 1 im)) (log 10)))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (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)))) (/ 1 (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)))) (/ 1 (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 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (/ (log 1/10) (log (/ 1 im)))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (/ (log 1/10) (log (/ 1 im))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (+ (* 1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ 1 im)) 3)))) (+ (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (/ (log 1/10) (log (/ 1 im))))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ 1 im)) 2)))) (+ (* -1/8 (/ (* (pow re 6) (log 1/10)) (* (pow im 6) (pow (log (/ 1 im)) 3)))) (+ (* 1/720 (/ (* (log 1/10) (+ (* 30 (pow re 6)) (* 90 (pow re 6)))) (* (pow im 6) (pow (log (/ 1 im)) 2)))) (+ (* 1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ 1 im)) 3)))) (+ (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log (/ 1 im)) 2)))) (+ (* 1/2 (/ (* (pow re 2) (+ (* -1/4 (/ (* (pow re 4) (log 1/10)) (pow (log (/ 1 im)) 2))) (* 1/4 (/ (* (pow re 4) (log 1/10)) (pow (log (/ 1 im)) 3))))) (* (pow im 6) (log (/ 1 im))))) (/ (log 1/10) (log (/ 1 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)) #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 (+ 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)))) (/ 1 (log 10))) #s(hole binary64 (* -1 (/ (log (/ -1 im)) (log 10)))))
#s(approx (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (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)))) (/ 1 (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)))) (/ 1 (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 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (/ (log 1/10) (log (/ -1 im)))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (/ (log 1/10) (log (/ -1 im))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (+ (* 1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ -1 im)) 3)))) (+ (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (/ (log 1/10) (log (/ -1 im))))))))
#s(approx (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) #s(hole binary64 (+ (* -1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ -1 im)) 2)))) (+ (* -1/8 (/ (* (pow re 6) (log 1/10)) (* (pow im 6) (pow (log (/ -1 im)) 3)))) (+ (* 1/720 (/ (* (log 1/10) (+ (* 30 (pow re 6)) (* 90 (pow re 6)))) (* (pow im 6) (pow (log (/ -1 im)) 2)))) (+ (* 1/4 (/ (* (pow re 4) (log 1/10)) (* (pow im 4) (pow (log (/ -1 im)) 3)))) (+ (* 1/2 (/ (* (pow re 2) (log 1/10)) (* (pow im 2) (pow (log (/ -1 im)) 2)))) (+ (* 1/2 (/ (* (pow re 2) (+ (* -1/4 (/ (* (pow re 4) (log 1/10)) (pow (log (/ -1 im)) 2))) (* 1/4 (/ (* (pow re 4) (log 1/10)) (pow (log (/ -1 im)) 3))))) (* (pow im 6) (log (/ -1 im))))) (/ (log 1/10) (log (/ -1 im)))))))))))

Calls

6 calls:

Time	Variable		Point	Expression
12.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))) im (log 1/10) 1/10 (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (neg (log re)) (log re) re (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10)) 1 (log 10) 10 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) (/ 1 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))))) (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im))
9.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))) im (log 1/10) 1/10 (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (neg (log re)) (log re) re (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10)) 1 (log 10) 10 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) (/ 1 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))))) (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im))
9.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))) im (log 1/10) 1/10 (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (neg (log re)) (log re) re (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10)) 1 (log 10) 10 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) (/ 1 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))))) (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im))
6.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))) im (log 1/10) 1/10 (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (neg (log re)) (log re) re (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10)) 1 (log 10) 10 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) (/ 1 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))))) (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im))
3.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))) im (log 1/10) 1/10 (/ (neg (log (sqrt (+ (* im im) (* re re))))) (log 1/10)) (neg (log (sqrt (+ (* im im) (* re re))))) (neg (log re)) (log re) re (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10)) 1 (log 10) 10 (* (log (sqrt (+ (* re re) (* im im)))) (/ 1 (log 10))) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg re) (/ 1 (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))))) (/ (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im))))) (neg (log 1/10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (neg im))

rewrite259.0ms (7%)

Memory

2.4MiB live, 190.9MiB allocated; 22ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	801	6266
0	825	5790
1	6079	5758
0	8076	4804
1	20325	4804

Stop Event

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

Counts

172 → 223

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

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

eval17.0ms (0.5%)

Memory: 25.2MiB live, 25.2MiB allocated; 0ms collecting garbage
Compiler: Compiled 3 672 to 964 computations (73.7% saved)

prune20.0ms (0.5%)

Memory

-17.3MiB live, 35.5MiB allocated; 8ms collecting garbage

Pruning

25 alts after pruning (11 fresh and 14 done)

	Pruned	Kept	Total
New	189	4	193
Fresh	2	7	9
Picked	0	5	5
Done	0	9	9
Total	191	25	216

Accuracy

99.9%

Counts

216 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	0.0%	(/.f64 (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re)))) (log.f64 #s(literal 1/10 binary64)))
✓	98.2%	(/.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)))
✓	53.2%	(/.f64 (log.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im)))) (log.f64 #s(literal 10 binary64)))
✓	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))) (log.f64 #s(literal 10 binary64)))
✓	0.0%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))) (log.f64 #s(literal 10 binary64)))
✓	98.1%	(/.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)) (log.f64 #s(literal 10 binary64)))
	0.0%	(/.f64 #s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 (neg.f64 im)))) (log.f64 #s(literal 1/10 binary64)))
✓	10.9%	(/.f64 #s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re))) (log.f64 #s(literal 1/10 binary64)))
✓	10.9%	(/.f64 #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re)) (log.f64 #s(literal 10 binary64)))
✓	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (log.f64 #s(literal 1/10 binary64))) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im)))))
✓	53.1%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 (sqrt.f64 (fma.f64 im im (*.f64 re re))))))
	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re)))))
✓	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im)))))
	10.9%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 10 binary64)) #s(approx (log (sqrt (+ (* re re) (* im im)))) (log.f64 re))))
	98.1%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 1/10 binary64)) (neg.f64 (log.f64 #s(approx (sqrt (+ (* re re) (* im im))) im)))))
	10.9%	(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 1/10 binary64)) #s(approx (neg (log (sqrt (+ (* im im) (* re re))))) (neg.f64 (log.f64 re)))))
	0.0%	(/.f64 #s(literal 1 binary64) (.f64 (log.f64 #s(literal 10 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 #s(approx (sqrt (+ ( re re) (* im im))) (neg.f64 im))))))
✓	98.0%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (/.f64 (log.f64 #s(literal 10 binary64)) (log.f64 im))))
	98.1%	(/.f64 #s(literal 1 binary64) #s(approx (/ (log 10) (log (sqrt (+ (* im im) (* re re))))) (*.f64 (log.f64 #s(literal 10 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 im)))))
✓	0.0%	(.f64 (log.f64 #s(approx (sqrt (+ ( re re) (* im im))) (neg.f64 re))) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))
	97.6%	(.f64 (log.f64 #s(approx (sqrt (+ ( re re) (* im im))) im)) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))
✓	10.9%	(.f64 #s(approx (log (sqrt (+ ( re re) (* im im)))) (log.f64 re)) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 10 binary64))))
	0.0%	(log.f64 (pow.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re)) (/.f64 #s(literal -1 binary64) (log.f64 #s(literal 1/10 binary64)))))
	0.0%	(log.f64 (pow.f64 #s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im)) (/.f64 #s(literal -1 binary64) (log.f64 #s(literal 1/10 binary64)))))

Compiler

Compiled 603 to 444 computations (26.4% saved)

regimes149.0ms (4.1%)

Memory

-15.1MiB live, 120.0MiB allocated; 15ms collecting garbage

Counts

30 → 1

Calls

Call 1

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

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

Calls

8 calls:

89.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
12.0ms	re
10.0ms	(*.f64 im im)
8.0ms	im
7.0ms	(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))

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 34 to 38 computations (-11.8% saved)

regimes58.0ms (1.6%)

Memory

26.9MiB live, 78.3MiB allocated; 8ms collecting garbage

Counts

25 → 1

Calls

Call 1

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 34 to 38 computations (-11.8% saved)

regimes84.0ms (2.3%)

Memory

-17.0MiB live, 28.6MiB allocated; 3ms collecting garbage

Counts

5 → 1

Calls

Call 1

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

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

Results

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

Compiler

Compiled 34 to 38 computations (-11.8% saved)

regimes8.0ms (0.2%)

Memory

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

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 34 to 38 computations (-11.8% saved)

derivations129.0ms (3.5%)

Memory

-32.3MiB live, 112.9MiB allocated; 25ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 32 to 22 computations (31.3% saved)

preprocess67.0ms (1.8%)

Memory

36.2MiB live, 124.4MiB allocated; 17ms collecting garbage

Remove

(abs im)

(sort re im)

Compiler

Compiled 366 to 356 computations (2.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze56.0ms (1.5%)

sample1.1s (30.1%)

preprocess184.0ms (5%)

series14.0ms (0.4%)

rewrite370.0ms (10.1%)

eval30.0ms (0.8%)

prune7.0ms (0.2%)

series96.0ms (2.6%)

rewrite305.0ms (8.3%)

eval20.0ms (0.6%)

prune9.0ms (0.2%)

series210.0ms (5.7%)

rewrite333.0ms (9.1%)

eval86.0ms (2.3%)

prune12.0ms (0.3%)

series46.0ms (1.2%)

rewrite259.0ms (7%)

eval17.0ms (0.5%)

prune20.0ms (0.5%)

regimes149.0ms (4.1%)

regimes58.0ms (1.6%)

regimes84.0ms (2.3%)

regimes8.0ms (0.2%)

derivations129.0ms (3.5%)

preprocess67.0ms (1.8%)

end0.0ms (0%)

Profiling