Metrics for math.log10 on complex, real part

start0.0ms (0%)

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

analyze122.0ms (6.3%)

Memory

-20.4MiB live, 68.5MiB allocated; 14ms 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)

sample883.0ms (45.7%)

Memory

11.6MiB live, 844.3MiB allocated; 203ms collecting garbage

Samples

548.0ms

8 256×

valid

Precisions

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

ival-hypot: 193.0ms (56.3% of total)

ival-log: 107.0ms (31.2% of total)

ival-div!: 42.0ms (12.3% of total)

adjust: 2.0ms (0.6% of total)

Bogosity

explain117.0ms (6%)

Memory

5.7MiB live, 102.5MiB allocated; 15ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
135	-	3	(-3.8955806452960478e-295 -6.915749115634227e-158)	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
0	-	0	-	`(log.f64 #s(literal 10 binary64))`
0	-	0	-	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`
0	-	0	-	`(*.f64 re re)`
0	-	0	-	`im`
0	-	0	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	-	0	-	`re`
0	-	0	-	`(*.f64 im im)`
0	-	0	-	`#s(literal 10 binary64)`
0	-	0	-	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	oflow-rescue	118	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	118
↳	`(*.f64 re re)`	overflow	72
↳	`(*.f64 im im)`	overflow	65
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	uflow-rescue	14	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	14
↳	`(*.f64 re re)`	underflow	58
↳	`(*.f64 im im)`	underflow	58

Confusion

	Predicted +	Predicted -
+	132	2
-	0	122

Precision

1.0

Recall

0.9850746268656716

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	132	0	2
-	0	0	122

Precision?

1.0

Recall?

0.9850746268656716

Freqs

test

number	freq
0	124
1	132

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

39.0ms

512×

valid

Compiler

Compiled 110 to 34 computations (69.1% saved)

Precisions

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

ival-hypot: 9.0ms (37.8% of total)

ival-log: 6.0ms (25.2% of total)

ival-mult!: 5.0ms (21% of total)

ival-div!: 2.0ms (8.4% of total)

ival-add!: 1.0ms (4.2% of total)

adjust: 0.0ms (0% of total)

preprocess10.0ms (0.5%)

Memory

-32.1MiB live, 14.8MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	28	74
1	60	74
2	110	74
3	135	74
4	173	74

Stop Event

1×

saturated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	49.5%	(/.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 24 to 20 computations (16.7% saved)

series15.0ms (0.8%)

Memory

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

Counts

10 → 79

Calls

Call 1

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

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

Calls

6 calls:

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)
3.0ms	im	@	inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)
1.0ms	re	@	-inf	((/ (log (sqrt (+ (* re re) (* im im)))) (log 10)) (log (sqrt (+ (* re re) (* im im)))) (sqrt (+ (* re re) (* im im))) (+ (* re re) (* im im)) (* re re) re (* im im) im (log 10) 10)

rewrite191.0ms (9.9%)

Memory

23.5MiB live, 208.4MiB allocated; 30ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	360	2530
0	371	2390
1	2012	2358
0	9623	1900

Stop Event

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

Counts

89 → 221

Calls

Call 1

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

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

eval33.0ms (1.7%)

Memory: -40.5MiB live, 58.3MiB allocated; 10ms collecting garbage
Compiler: Compiled 4 931 to 969 computations (80.3% saved)

prune96.0ms (5%)

Memory

24.3MiB live, 110.7MiB allocated; 16ms collecting garbage

Pruning

2 alts after pruning (2 fresh and 0 done)

	Pruned	Kept	Total
New	215	2	217
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	216	2	218

Accuracy

99.7%

Counts

218 → 2

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.0%	(/.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 im re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
▶	99.1%	(/.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 1 binary64))) (log.f64 #s(literal 10 binary64)))

Status

Accuracy

Program

▶

99.0%

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

▶

99.1%

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

Compiler

Compiled 20 to 20 computations (0% saved)

series22.0ms (1.1%)

Memory

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

Counts

16 → 176

Calls

Call 1

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

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

Calls

6 calls:

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

rewrite186.0ms (9.6%)

Memory

-29.3MiB live, 158.6MiB allocated; 29ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	713	6390
0	730	5474
1	4155	5389
0	8422	5115

Stop Event

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

Counts

192 → 397

Calls

Call 1

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

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

eval58.0ms (3%)

Memory: -1.1MiB live, 49.5MiB allocated; 45ms collecting garbage
Compiler: Compiled 8 234 to 1 169 computations (85.8% saved)

prune109.0ms (5.6%)

Memory

25.1MiB live, 118.4MiB allocated; 12ms collecting garbage

Pruning

2 alts after pruning (0 fresh and 2 done)

	Pruned	Kept	Total
New	263	0	263
Fresh	0	0	0
Picked	0	2	2
Done	0	0	0
Total	263	2	265

Accuracy

99.7%

Counts

265 → 2

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.0%	(/.f64 (neg.f64 (log.f64 (/.f64 #s(literal 1 binary64) (hypot.f64 im re)))) (neg.f64 (log.f64 #s(literal 1/10 binary64))))
✓	99.1%	(/.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 1 binary64))) (log.f64 #s(literal 10 binary64)))

Status

Accuracy

Program

✓

99.0%

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

✓

99.1%

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

Compiler

Compiled 52 to 42 computations (19.2% saved)

regimes14.0ms (0.7%)

Memory

-23.0MiB live, 22.9MiB allocated; 3ms collecting garbage

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

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

Calls

8 calls:

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

Results

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

Compiler

Compiled 44 to 38 computations (13.6% saved)

regimes8.0ms (0.4%)

Memory

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

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

8 calls:

1.0ms	re
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	(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
49.5%	1	`re`
49.5%	1	`im`
49.5%	1	`(*.f64 im im)`
49.5%	1	`(*.f64 re re)`
49.5%	1	`(+.f64 (.f64 re re) (.f64 im im))`
49.5%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
49.5%	1	`(log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))`
49.5%	1	`(/.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (log.f64 #s(literal 10 binary64)))`

Compiler

Compiled 44 to 38 computations (13.6% saved)

derivations32.0ms (1.7%)

Memory

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

Stop Event

1×

done

Compiler

Compiled 21 to 15 computations (28.6% saved)

preprocess37.0ms (1.9%)

Memory

-19.4MiB live, 32.8MiB allocated; 6ms collecting garbage

Remove

(sort re im)

(abs im)

(abs re)

Compiler

Compiled 192 to 164 computations (14.6% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze122.0ms (6.3%)

sample883.0ms (45.7%)

explain117.0ms (6%)

preprocess10.0ms (0.5%)

series15.0ms (0.8%)

rewrite191.0ms (9.9%)

eval33.0ms (1.7%)

prune96.0ms (5%)

series22.0ms (1.1%)

rewrite186.0ms (9.6%)

eval58.0ms (3%)

prune109.0ms (5.6%)

regimes14.0ms (0.7%)

regimes8.0ms (0.4%)

derivations32.0ms (1.7%)

preprocess37.0ms (1.9%)

end0.0ms (0%)

Profiling