Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory

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

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.9%	0.1%	0%	0%	0%	0
100%	99.9%	0%	0.1%	0%	0%	0%	1

Compiler

Compiled 14 to 13 computations (7.1% saved)

sample3.1s (56.9%)

Memory

-59.0MiB live, 3 002.6MiB allocated; 1.7s collecting garbage

Samples

1.6s	1 651×	2	valid
645.0ms	2 394×	1	valid
470.0ms	4 211×	0	valid

Precisions

Click to see histograms. Total time spent on operations: 2.3s

ival-exp: 1.6s (68.1% of total)

ival-cos: 314.0ms (13.5% of total)

adjust: 221.0ms (9.5% of total)

ival-mult!: 117.0ms (5% of total)

ival-sub!: 92.0ms (3.9% of total)

Bogosity

preprocess37.0ms (0.7%)

Memory

-9.1MiB live, 34.3MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	30	70
1	95	66
2	221	66
3	660	66
4	3561	34

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	52.1%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Symmetry

(abs re)

(negabs im)

Compiler

Compiled 22 to 22 computations (0% saved)

series9.0ms (0.2%)

Memory

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

Counts

11 → 40

Calls

Call 1

Inputs
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
(exp.f64 (-.f64 #s(literal 0 binary64) im))
(-.f64 #s(literal 0 binary64) im)
#s(literal 0 binary64)
im
(exp.f64 im)

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (* 1/2 (cos re))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (- 0 im)) #s(hole binary64 1))
#s(approx (exp (- 0 im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (- 0 im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (- 0 im) #s(hole binary64 (* -1 im)))
#s(approx im #s(hole binary64 im))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (exp (* -1 im))))

Calls

6 calls:

Time	Variable		Point	Expression
2.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) (- 0 im) 0 im (exp im))
1.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) (- 0 im) 0 im (exp im))
1.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) (- 0 im) 0 im (exp im))
1.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) (- 0 im) 0 im (exp im))
1.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) (- 0 im) 0 im (exp im))

rewrite201.0ms (3.7%)

Memory

-4.0MiB live, 319.7MiB allocated; 63ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	188	735
0	199	699
1	1026	666
0	8544	634

Stop Event

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

Counts

51 → 109

Calls

Call 1

Inputs
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
(exp.f64 (-.f64 #s(literal 0 binary64) im))
(-.f64 #s(literal 0 binary64) im)
#s(literal 0 binary64)
im
(exp.f64 im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (* 1/2 (cos re))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (- 0 im)) #s(hole binary64 1))
#s(approx (exp (- 0 im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (- 0 im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (- 0 im) #s(hole binary64 (* -1 im)))
#s(approx im #s(hole binary64 im))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (exp (* -1 im))))

Outputs
(.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64))
(.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(.f64 (cos.f64 re) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)))
(/.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(/.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (+.f64 (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) #s(literal 1 binary64)))
(neg.f64 (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal -1/2 binary64)))
(neg.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re))))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(neg.f64 (*.f64 (cos.f64 re) #s(literal -1/2 binary64)))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 re)))
#s(literal 1/2 binary64)
(sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 re)))
(cos.f64 (neg.f64 re))
(cos.f64 re)
(+.f64 (.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
re
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (neg.f64 (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) #s(literal 1 binary64))))
(/.f64 (-.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(/.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (+.f64 (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) #s(literal 1 binary64)))
(-.f64 (-.f64 (exp.f64 (neg.f64 im)) (cosh.f64 im)) (sinh.f64 im))
(-.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (/.f64 (exp.f64 (+.f64 im im)) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(-.f64 (/.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) #s(literal 1 binary64))) (/.f64 (exp.f64 (.f64 im #s(literal 3 binary64))) (+.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) #s(literal 1 binary64))))
(-.f64 (cosh.f64 im) (+.f64 (sinh.f64 im) (exp.f64 im)))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(+.f64 (cosh.f64 im) (-.f64 (sinh.f64 (neg.f64 im)) (exp.f64 im)))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (/.f64 im #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (/.f64 im #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal -1 binary64)) im)
(pow.f64 (exp.f64 im) #s(literal -1 binary64))
(/.f64 (-.f64 (.f64 (cosh.f64 im) (cosh.f64 im)) (.f64 (sinh.f64 im) (sinh.f64 im))) (exp.f64 im))
(/.f64 (-.f64 (.f64 (cosh.f64 im) (cosh.f64 im)) (.f64 (sinh.f64 (neg.f64 im)) (sinh.f64 (neg.f64 im)))) (-.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im))))
(/.f64 (-.f64 (pow.f64 (cosh.f64 im) #s(literal 3 binary64)) (pow.f64 (sinh.f64 im) #s(literal 3 binary64))) (fma.f64 (cosh.f64 im) (cosh.f64 im) (fma.f64 (sinh.f64 im) (sinh.f64 im) (*.f64 (cosh.f64 im) (sinh.f64 im)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 im) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (neg.f64 im)) #s(literal 3 binary64))) (fma.f64 (cosh.f64 im) (cosh.f64 im) (-.f64 (.f64 (sinh.f64 (neg.f64 im)) (sinh.f64 (neg.f64 im))) (.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 im)))
(/.f64 #s(literal 1 binary64) (exp.f64 im))
(neg.f64 (/.f64 #s(literal -1 binary64) (exp.f64 im)))
(-.f64 (cosh.f64 im) (sinh.f64 im))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) im))
(exp.f64 (neg.f64 im))
(+.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im)))
(*.f64 #s(literal -1 binary64) im)
(*.f64 #s(literal 1 binary64) (neg.f64 im))
(*.f64 im #s(literal -1 binary64))
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 im) im)) im)
(/.f64 (.f64 #s(literal 1 binary64) (.f64 (*.f64 im im) (neg.f64 im))) (fma.f64 im im #s(literal 0 binary64)))
(/.f64 (neg.f64 (.f64 (.f64 im im) (neg.f64 im))) (neg.f64 (fma.f64 im im #s(literal 0 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (*.f64 #s(literal 2 binary64) im))
(/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (neg.f64 im))) (.f64 #s(literal 2 binary64) (fma.f64 im im #s(literal 0 binary64))))
(/.f64 (*.f64 (neg.f64 im) im) im)
(/.f64 (.f64 (.f64 im im) (neg.f64 im)) (fma.f64 im im #s(literal 0 binary64)))
(/.f64 (*.f64 im im) (neg.f64 im))
(neg.f64 (*.f64 #s(literal -1 binary64) (neg.f64 im)))
(neg.f64 im)
(-.f64 (/.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im im) im))
(-.f64 (/.f64 #s(literal 0 binary64) (fma.f64 im im #s(literal 0 binary64))) (/.f64 (.f64 (.f64 im im) im) (fma.f64 im im #s(literal 0 binary64))))
(-.f64 #s(literal 0 binary64) im)
#s(literal 0 binary64)
im
(/.f64 (-.f64 (.f64 (cosh.f64 im) (cosh.f64 im)) (.f64 (sinh.f64 im) (sinh.f64 im))) (exp.f64 (neg.f64 im)))
(/.f64 (+.f64 (pow.f64 (cosh.f64 im) #s(literal 3 binary64)) (pow.f64 (sinh.f64 im) #s(literal 3 binary64))) (fma.f64 (cosh.f64 im) (cosh.f64 im) (-.f64 (.f64 (sinh.f64 im) (sinh.f64 im)) (.f64 (cosh.f64 im) (sinh.f64 im)))))
(exp.f64 im)
(+.f64 (cosh.f64 im) (sinh.f64 im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 #s(literal 1/48 binary64) (.f64 re re) #s(literal -1/4 binary64))) (.f64 re re) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64))) re) re) re) re)))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (.f64 re re) #s(literal -1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) re) re #s(literal 1/2 binary64)))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (.f64 (-.f64 (.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 re re) #s(literal 1/24 binary64)) re) re) #s(literal 1/2 binary64)) re) re #s(literal 1 binary64)))
#s(approx re re)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64))) im) im (neg.f64 (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) im) im) im) im)) im))
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(literal -2 binary64) im))
#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (*.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (exp (- 0 im)) #s(literal 1 binary64))
#s(approx (exp (- 0 im)) (-.f64 #s(literal 1 binary64) im))
#s(approx (exp (- 0 im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp (- 0 im)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal -1 binary64)) im #s(literal 1 binary64)))
#s(approx (- 0 im) (neg.f64 im))
#s(approx im im)
#s(approx (exp im) #s(literal 1 binary64))
#s(approx (exp im) (-.f64 im #s(literal -1 binary64)))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp im) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (- (exp (- 0 im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (- 0 im)) (exp.f64 (neg.f64 im)))
#s(approx (exp im) (exp.f64 im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (- (exp (- 0 im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (- 0 im)) (exp.f64 (neg.f64 im)))

eval10.0ms (0.2%)

Memory: 28.1MiB live, 28.1MiB allocated; 0ms collecting garbage
Compiler: Compiled 914 to 455 computations (50.2% saved)

prune7.0ms (0.1%)

Memory

-29.4MiB live, 17.5MiB allocated; 2ms collecting garbage

Pruning

6 alts after pruning (6 fresh and 0 done)

	Pruned	Kept	Total
New	92	6	98
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	93	6	99

Accuracy

99.9%

Counts

99 → 6

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))
▶	92.1%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
▶	40.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
▶	37.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
▶	88.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
▶	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 216 to 216 computations (0% saved)

series144.0ms (2.6%)

Memory

-26.6MiB live, 55.3MiB allocated; 131ms collecting garbage

Counts

38 → 128

Calls

Call 1

Inputs
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
(.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)
(-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))
(.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im)
(.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im)
(-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64))
(.f64 #s(literal -1/60 binary64) (.f64 im im))
#s(literal -1/60 binary64)
(*.f64 im im)
im
#s(literal 1/3 binary64)
#s(literal 2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
(exp.f64 im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
(*.f64 (neg.f64 (cos.f64 re)) im)
(neg.f64 (cos.f64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
(.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im)
(.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))
(*.f64 #s(literal -1/6 binary64) im)
#s(literal -1/6 binary64)
#s(literal -1 binary64)

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (* -1 im)))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (+ (* -1 im) (* 1/2 (* im (pow re 2))))))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2))))))))))
#s(approx (neg (cos re)) #s(hole binary64 -1))
#s(approx (neg (cos re)) #s(hole binary64 (- (* 1/2 (pow re 2)) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* im (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* 1/24 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* 1/24 (* im (- (* -1/6 (pow im 2)) 1))))))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* -1/6 (pow im 2))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* 1/24 (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))) 1)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (* 1/2 (cos re))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/2 (/ (- (exp (neg im)) (exp im)) (pow re 2)))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (cos re) (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -2 im)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 -2))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (- (* -1/3 (pow im 2)) 2)))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* -1/3 (pow im 2))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* -1/3 im)))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* im (- (* -1/60 (pow im 2)) 1/3))))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 -1/3))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 (- (* -1/60 (pow im 2)) 1/3)))
#s(approx (* -1/60 (* im im)) #s(hole binary64 (* -1/60 (pow im 2))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* -1 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (neg im)) #s(hole binary64 1))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (neg im) #s(hole binary64 (* -1 im)))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -2 (* im (+ 1/2 (* -1/4 (pow re 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/3 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/60 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/60 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/2520 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 -1))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* -1/6 im) #s(hole binary64 (* -1/6 im)))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -1/60 (pow im 5))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (* -1/60 (pow im 4))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* -1/60 (pow im 4))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* -1/60 (pow im 3))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* -1 (* (pow im 3) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 (* -1/60 (pow im 2))))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (neg im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 (* -1/6 (pow im 2))))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4))))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (* -1 im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (* -1 im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))

Calls

6 calls:

Time	Variable		Point	Expression
123.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 (* im im) im 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
4.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 (* im im) im 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
4.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 (* im im) im 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
3.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 (* im im) im 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
3.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 (* im im) im 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)

rewrite213.0ms (3.9%)

Memory

11.9MiB live, 324.1MiB allocated; 78ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	475	3017
0	517	2901
1	2457	2899
0	8755	2835

Stop Event

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

Counts

166 → 367

Calls

Call 1

Inputs
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
(.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)
(-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))
(.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im)
(.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im)
(-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64))
(.f64 #s(literal -1/60 binary64) (.f64 im im))
#s(literal -1/60 binary64)
(*.f64 im im)
im
#s(literal 1/3 binary64)
#s(literal 2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
(exp.f64 im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
(*.f64 (neg.f64 (cos.f64 re)) im)
(neg.f64 (cos.f64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
(.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im)
(.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))
(*.f64 #s(literal -1/6 binary64) im)
#s(literal -1/6 binary64)
#s(literal -1 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 1/2))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (* -1 im)))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (+ (* -1 im) (* 1/2 (* im (pow re 2))))))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2))))))))))
#s(approx (neg (cos re)) #s(hole binary64 -1))
#s(approx (neg (cos re)) #s(hole binary64 (- (* 1/2 (pow re 2)) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* im (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* 1/24 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* 1/24 (* im (- (* -1/6 (pow im 2)) 1))))))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* -1/6 (pow im 2))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* 1/24 (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))) 1)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* 1/2 (cos re)) #s(hole binary64 (* 1/2 (cos re))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/2 (/ (- (exp (neg im)) (exp im)) (pow re 2)))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))))
#s(approx (* (neg (cos re)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (cos re) (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -2 im)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 -2))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (- (* -1/3 (pow im 2)) 2)))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* -1/3 (pow im 2))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* -1/3 im)))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* im (- (* -1/60 (pow im 2)) 1/3))))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 -1/3))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 (- (* -1/60 (pow im 2)) 1/3)))
#s(approx (* -1/60 (* im im)) #s(hole binary64 (* -1/60 (pow im 2))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* -1 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (neg im)) #s(hole binary64 1))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (neg im) #s(hole binary64 (* -1 im)))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -2 (* im (+ 1/2 (* -1/4 (pow re 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/3 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/60 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/60 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/2520 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 -1))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* -1/6 im) #s(hole binary64 (* -1/6 im)))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -1/60 (pow im 5))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (* -1/60 (pow im 4))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(hole binary64 (* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* -1/60 (pow im 4))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) #s(hole binary64 (* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* -1/60 (pow im 3))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) #s(hole binary64 (* -1 (* (pow im 3) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 (* -1/60 (pow im 2))))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (neg im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 (* -1/6 (pow im 2))))
#s(approx (+ (* (* -1/6 im) im) -1) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (- (exp (- 0 im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) #s(hole binary64 (* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4))))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (* -1 im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (* -1 im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))

Outputs
(.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
(.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) #s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 re)))
(cos.f64 (neg.f64 re))
(cos.f64 re)
(+.f64 (.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
re
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
(.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)
(.f64 im (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (fma.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 3 binary64)) #s(literal 8 binary64))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) #s(literal 4 binary64)) (fma.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))))) (/.f64 #s(literal 8 binary64) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))))))
(-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))
(.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im)
(.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) (.f64 im im))
(.f64 (.f64 im im) (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))
(.f64 im (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im))
(.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im)
(.f64 im (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64))) #s(literal 1/9 binary64))) (neg.f64 (fma.f64 (.f64 im im) #s(literal -1/60 binary64) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 3 binary64)) #s(literal 1/27 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64))) #s(literal 1/9 binary64)) (fma.f64 (.f64 im im) #s(literal -1/60 binary64) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 3 binary64)) #s(literal 1/27 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))))
(-.f64 (/.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64))) (fma.f64 (.f64 im im) #s(literal -1/60 binary64) #s(literal 1/3 binary64))) (/.f64 #s(literal 1/9 binary64) (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal 1/3 binary64))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64))))) (/.f64 #s(literal 1/27 binary64) (fma.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64))))))
(-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64))
(.f64 (.f64 #s(literal -1/60 binary64) im) im)
(.f64 (.f64 im im) #s(literal -1/60 binary64))
(.f64 #s(literal -1/60 binary64) (.f64 im im))
#s(literal -1/60 binary64)
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 im im)
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 im #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (-.f64 #s(literal 0 binary64) (.f64 im im))) (.f64 (+.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 0 binary64) im)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (.f64 (+.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (-.f64 #s(literal 0 binary64) (.f64 im im))) (.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im))) (+.f64 #s(literal 0 binary64) im)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im))) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(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
#s(literal 1/3 binary64)
#s(literal 2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(/.f64 (neg.f64 (-.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (neg.f64 (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (neg.f64 (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))))
(/.f64 (-.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(/.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im)))))
(-.f64 (/.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (/.f64 (exp.f64 (+.f64 im im)) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(-.f64 (/.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))) (/.f64 (exp.f64 (.f64 im #s(literal 3 binary64))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(pow.f64 (exp.f64 #s(literal -1 binary64)) im)
(pow.f64 (exp.f64 im) #s(literal -1 binary64))
(/.f64 (+.f64 (pow.f64 (cosh.f64 im) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (neg.f64 im)) #s(literal 3 binary64))) (fma.f64 (cosh.f64 im) (cosh.f64 im) (-.f64 (.f64 (sinh.f64 (neg.f64 im)) (sinh.f64 (neg.f64 im))) (.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im))))))
(/.f64 #s(literal 1 binary64) (exp.f64 im))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 im)))
(-.f64 (cosh.f64 im) (sinh.f64 im))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) im))
(exp.f64 (neg.f64 im))
(+.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im)))
(*.f64 #s(literal -1 binary64) im)
(*.f64 im #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (+.f64 #s(literal 0 binary64) im)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (neg.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im))))
(neg.f64 im)
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im im) (+.f64 #s(literal 0 binary64) im)))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))) (/.f64 (.f64 (.f64 im im) im) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(-.f64 #s(literal 0 binary64) im)
(/.f64 (+.f64 (pow.f64 (cosh.f64 im) #s(literal 3 binary64)) (pow.f64 (sinh.f64 im) #s(literal 3 binary64))) (fma.f64 (cosh.f64 im) (cosh.f64 im) (-.f64 (.f64 (sinh.f64 im) (sinh.f64 im)) (.f64 (cosh.f64 im) (sinh.f64 im)))))
(exp.f64 im)
(+.f64 (cosh.f64 im) (sinh.f64 im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3 binary64)) #s(literal -1/64 binary64) (.f64 (pow.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im)))) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im)))) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im)))) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) (exp.f64 (+.f64 (neg.f64 im) im)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3 binary64)) #s(literal -1/64 binary64) (.f64 (pow.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))))))
(fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -1/4 binary64) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))))
(-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal -1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))))) (/.f64 (.f64 (pow.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))))))
(+.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 re (*.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (/.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 re re)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(+.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))) (/.f64 (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(+.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)))
(*.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 re)))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (*.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))))
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(.f64 (.f64 (cos.f64 re) im) #s(literal -1 binary64))
(*.f64 (neg.f64 im) (cos.f64 re))
(.f64 #s(literal -1 binary64) (.f64 (cos.f64 re) im))
(*.f64 im (neg.f64 (cos.f64 re)))
(neg.f64 (*.f64 (cos.f64 re) im))
(*.f64 #s(literal -1 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1 binary64))
(neg.f64 (cos.f64 re))
(sin.f64 (neg.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 re (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 re (PI.f64))))
(cos.f64 (+.f64 (neg.f64 re) (PI.f64)))
(cos.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 re (PI.f64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im)
(.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im))
(.f64 im (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 im) (cos.f64 re)) (-.f64 (.f64 (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 im) (cos.f64 re)) (-.f64 (.f64 (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))))))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(fma.f64 (.f64 (cos.f64 re) im) #s(literal -1 binary64) (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(fma.f64 (.f64 (cos.f64 re) im) #s(literal -1 binary64) (.f64 im (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(fma.f64 (neg.f64 im) (cos.f64 re) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(fma.f64 (neg.f64 im) (cos.f64 re) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 re) im) (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 re) im) (.f64 im (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(fma.f64 im (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(fma.f64 im (neg.f64 (cos.f64 re)) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(+.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(+.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 im (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re))
(.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (fma.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/6 binary64))) (.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/6 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (.f64 (.f64 (cos.f64 re) (.f64 (*.f64 im im) #s(literal -1/6 binary64))) (neg.f64 (cos.f64 re))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))))))
(fma.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64) (neg.f64 (cos.f64 re)))
(fma.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re)))
(fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
(fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 im im) (cos.f64 re)) (neg.f64 (cos.f64 re)))
(fma.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re)))
(fma.f64 (cos.f64 re) #s(literal -1 binary64) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))))
(-.f64 (neg.f64 (cos.f64 re)) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 im im) (cos.f64 re))))
(+.f64 (/.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))))))
(+.f64 (.f64 (cos.f64 re) (.f64 (*.f64 im im) #s(literal -1/6 binary64))) (neg.f64 (cos.f64 re)))
(+.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re)))
(+.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
(/.f64 (+.f64 #s(literal -1 binary64) (.f64 (.f64 #s(literal -1/216 binary64) (.f64 (.f64 im im) im)) (.f64 (.f64 im im) im))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64))) (.f64 #s(literal -1 binary64) (.f64 (.f64 im im) #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (fma.f64 (.f64 #s(literal -1/216 binary64) (.f64 (.f64 im im) im)) (.f64 (.f64 im im) im) #s(literal -1 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64)))
(/.f64 (fma.f64 (.f64 #s(literal -1/216 binary64) (.f64 (.f64 im im) im)) (.f64 (.f64 im im) im) #s(literal -1 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64)))))
(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 im (*.f64 #s(literal -1/6 binary64) im) #s(literal -1 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64))) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))))
(+.f64 (/.f64 (.f64 (.f64 #s(literal -1/216 binary64) (.f64 (.f64 im im) im)) (.f64 (.f64 im im) im)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))))) (/.f64 #s(literal -1 binary64) (fma.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) (.f64 (.f64 im im) #s(literal -1/6 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))))))
(+.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))
(+.f64 #s(literal -1 binary64) (.f64 (.f64 im im) #s(literal -1/6 binary64)))
(*.f64 #s(literal -1/6 binary64) im)
(*.f64 im #s(literal -1/6 binary64))
#s(literal -1/6 binary64)
#s(literal -1 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 1/48 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64))) (*.f64 re re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64) (.f64 (fma.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 #s(literal -1/1440 binary64) (.f64 re re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))) (.f64 re re))) (*.f64 re re))))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/1440 binary64) (.f64 re re) #s(literal 1/48 binary64)) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 re re) #s(literal 1/24 binary64)) (.f64 re re)) #s(literal 1/2 binary64)) (.f64 re re) #s(literal 1 binary64)))
#s(approx re re)
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* (* re re) -1/4) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* re re) (*.f64 re re))
#s(approx (* (neg (cos re)) im) (neg.f64 im))
#s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im)))
#s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re re) (fma.f64 #s(literal -1/24 binary64) (.f64 (.f64 re re) im) (.f64 im #s(literal 1/2 binary64))) (neg.f64 im)))
#s(approx (* (neg (cos re)) im) (fma.f64 (fma.f64 (.f64 re re) (fma.f64 #s(literal 1/720 binary64) (.f64 (.f64 re re) im) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) (.f64 re re) (neg.f64 im)))
#s(approx (neg (cos re)) #s(literal -1 binary64))
#s(approx (neg (cos re)) (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re)) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re)) #s(literal 1 binary64)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (fma.f64 (.f64 #s(literal -1/2 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im) #s(literal 1/24 binary64))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) #s(literal 1/24 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (fma.f64 (.f64 im im) #s(literal -1/6 binary64) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) #s(literal -1/720 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) #s(literal 1/24 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))) (.f64 re re)) #s(literal 1 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (/.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 re re)) #s(literal 1/2 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64))) (.f64 re re)))
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (*.f64 re re)))
#s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (neg (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 (cos.f64 re) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) (.f64 im im)) (cos.f64 re) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 im im)) (cos.f64 re) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re))) im))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 #s(literal -2 binary64) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (*.f64 #s(literal -2 binary64) im))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(literal -2 binary64))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (.f64 #s(literal -1/3 binary64) (.f64 im im)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (*.f64 #s(literal -1/3 binary64) im))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(literal -1/3 binary64))
#s(approx (- (* -1/60 (* im im)) 1/3) (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))
#s(approx (* -1/60 (* im im)) (.f64 (.f64 im im) #s(literal -1/60 binary64)))
#s(approx (* im im) (*.f64 im im))
#s(approx im im)
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/120 binary64) (.f64 im im)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/5040 binary64) (.f64 im im)) #s(literal 1/120 binary64)) (.f64 im im)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 #s(literal -2 binary64) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64)))
#s(approx (exp (neg im)) (fma.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp (neg im)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) im #s(literal 1/2 binary64)) im) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (neg im) (neg.f64 im))
#s(approx (exp im) #s(literal 1 binary64))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp im) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) im) #s(literal -2 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (.f64 (.f64 im im) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(literal -1/3 binary64) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(literal -1/60 binary64) (.f64 #s(literal -1/3 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -2 binary64) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(literal -1/2520 binary64) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(literal -1/60 binary64))) (.f64 im im) (.f64 #s(literal -1/3 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (neg.f64 (cos.f64 re)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
#s(approx (+ (* (* -1/6 im) im) -1) #s(literal -1 binary64))
#s(approx (+ (* (* -1/6 im) im) -1) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* -1/6 im) (*.f64 #s(literal -1/6 binary64) im))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/60 binary64)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64)))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (.f64 (.f64 (.f64 im im) (.f64 im im)) #s(literal -1/60 binary64)))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (neg.f64 (.f64 (.f64 (.f64 im im) (.f64 im im)) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 im im)) #s(literal 1/60 binary64)))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (.f64 (.f64 (.f64 im im) (.f64 im im)) (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (.f64 im im))) #s(literal 1/60 binary64))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (.f64 (.f64 (.f64 im im) (.f64 im im)) #s(literal -1/60 binary64)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (neg.f64 (.f64 (.f64 (.f64 im im) (.f64 im im)) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 im im)) #s(literal 1/60 binary64)))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/60 binary64)))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (.f64 (.f64 (.f64 im im) (neg.f64 im)) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64))))
#s(approx (- (* -1/60 (* im im)) 1/3) (.f64 (.f64 im im) #s(literal -1/60 binary64)))
#s(approx (- (* -1/60 (* im im)) 1/3) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (*.f64 im im))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (exp im) (exp.f64 im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
#s(approx (+ (* (* -1/6 im) im) -1) (.f64 (.f64 im im) #s(literal -1/6 binary64)))
#s(approx (+ (* (* -1/6 im) im) -1) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (.f64 im im))) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im))))

eval52.0ms (1%)

Memory: 37.6MiB live, 90.9MiB allocated; 24ms collecting garbage
Compiler: Compiled 5 270 to 1 873 computations (64.5% saved)

prune49.0ms (0.9%)

Memory

-1.8MiB live, 79.9MiB allocated; 29ms collecting garbage

Pruning

25 alts after pruning (22 fresh and 3 done)

	Pruned	Kept	Total
New	366	21	387
Fresh	0	1	1
Picked	2	3	5
Done	0	0	0
Total	368	25	393

Accuracy

100.0%

Counts

393 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))
✓	92.1%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
	52.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (.f64 im im))) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))))))
▶	88.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)))
	20.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 im) (cos.f64 re)) (-.f64 (.f64 (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))))))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re)))))) im))
	60.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) im))
	53.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
▶	10.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	40.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
▶	36.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
✓	88.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	55.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	54.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) im))
✓	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
▶	63.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
	36.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	33.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	34.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
▶	28.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	54.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im)))))
	34.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))

Compiler

Compiled 1 230 to 1 100 computations (10.6% saved)

series34.0ms (0.6%)

Memory

-2.0MiB live, 43.0MiB allocated; 9ms collecting garbage

Counts

35 → 127

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(neg.f64 (cos.f64 re))
(cos.f64 re)
re
im
(.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)
(.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))
(.f64 (.f64 im im) (cos.f64 re))
(*.f64 im im)
#s(literal -1/6 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
(neg.f64 im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 im)
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))
(exp.f64 (neg.f64 im))
#s(approx (exp im) #s(literal 1 binary64))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im)
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (* -1/6 (pow im 3)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (* 1/2 im)))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* -1/144 (pow im 3)))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (+ (* -1/144 (pow im 3)) (* (pow re 2) (+ (* 1/4320 (pow im 3)) (* 1/720 im)))))))))))))
#s(approx (neg (cos re)) #s(hole binary64 -1))
#s(approx (neg (cos re)) #s(hole binary64 (- (* 1/2 (pow re 2)) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (* -1/6 (pow im 3))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (+ (* -1/6 (pow im 3)) (* 1/12 (* (pow im 3) (pow re 2))))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* -1/144 (* (pow im 3) (pow re 2))) (* 1/12 (pow im 3)))))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (* (pow re 2) (+ (* -1/144 (pow im 3)) (* 1/4320 (* (pow im 3) (pow re 2))))))))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (* -1/6 (pow im 2))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (+ (* -1/6 (pow im 2)) (* 1/12 (* (pow im 2) (pow re 2))))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/144 (* (pow im 2) (pow re 2))) (* 1/12 (pow im 2)))))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* 1/12 (pow im 2)) (* (pow re 2) (+ (* -1/144 (pow im 2)) (* 1/4320 (* (pow im 2) (pow re 2))))))))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (pow im 2)))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (+ (* -1/2 (* (pow im 2) (pow re 2))) (pow im 2))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/2 (pow im 2)) (* 1/24 (* (pow im 2) (pow re 2))))) (pow im 2))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/2 (pow im 2)) (* (pow re 2) (+ (* -1/720 (* (pow im 2) (pow re 2))) (* 1/24 (pow im 2)))))) (pow im 2))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* im (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* 1/24 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* 1/24 (* im (- (* -1/6 (pow im 2)) 1))))))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* -1/6 (pow im 2))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* 1/24 (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))) 1)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow im 2) (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* (pow im 2) (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* -1 (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* 1/2 (/ 1 (pow im 2)))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* 1/2 (/ 1 (pow im 2))) (* (pow re 2) (- (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2))))) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (/ -1 (pow im 2))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* 1/2 (/ (pow re 2) (pow im 2))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) (pow im 2))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) (pow im 2))) (* 1/24 (/ 1 (pow im 2))))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 (* im (cos re))) (* -1/6 (* (pow im 3) (cos re))))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (* (pow im 2) (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/2 (/ (- (exp (neg im)) (exp im)) (pow re 2)))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (cos re) (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* -1 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (neg im) #s(hole binary64 (* -1 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (neg im)) #s(hole binary64 1))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -2 (* im (+ 1/2 (* -1/4 (pow re 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/3 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/60 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/60 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/2520 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (pow im 2))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (neg im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (* -1 im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (* -1 im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))

Calls

6 calls:

Time	Variable		Point	Expression
11.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg (cos re)) (cos re) re im (* (* (* (* im im) (cos re)) -1/6) im) (* (* (* im im) (cos re)) -1/6) (* (* im im) (cos re)) (* im im) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/ (neg (cos re)) (* im im)))
5.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg (cos re)) (cos re) re im (* (* (* (* im im) (cos re)) -1/6) im) (* (* (* im im) (cos re)) -1/6) (* (* im im) (cos re)) (* im im) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/ (neg (cos re)) (* im im)))
4.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg (cos re)) (cos re) re im (* (* (* (* im im) (cos re)) -1/6) im) (* (* (* im im) (cos re)) -1/6) (* (* im im) (cos re)) (* im im) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/ (neg (cos re)) (* im im)))
4.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg (cos re)) (cos re) re im (* (* (* (* im im) (cos re)) -1/6) im) (* (* (* im im) (cos re)) -1/6) (* (* im im) (cos re)) (* im im) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/ (neg (cos re)) (* im im)))
4.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg (cos re)) (cos re) re im (* (* (* (* im im) (cos re)) -1/6) im) (* (* (* im im) (cos re)) -1/6) (* (* im im) (cos re)) (* im im) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/ (neg (cos re)) (* im im)))

rewrite172.0ms (3.1%)

Memory

-25.7MiB live, 168.8MiB allocated; 36ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	547	3659
0	586	3446
1	3303	3428
0	8155	3287

Stop Event

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

Counts

162 → 343

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))
(neg.f64 (cos.f64 re))
(cos.f64 re)
re
im
(.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)
(.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))
(.f64 (.f64 im im) (cos.f64 re))
(*.f64 im im)
#s(literal -1/6 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
(neg.f64 im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 im)
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))
(exp.f64 (neg.f64 im))
#s(approx (exp im) #s(literal 1 binary64))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im)
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (* -1/6 (pow im 3)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (* 1/2 im)))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* -1/144 (pow im 3)))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 im) (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (+ (* -1/144 (pow im 3)) (* (pow re 2) (+ (* 1/4320 (pow im 3)) (* 1/720 im)))))))))))))
#s(approx (neg (cos re)) #s(hole binary64 -1))
#s(approx (neg (cos re)) #s(hole binary64 (- (* 1/2 (pow re 2)) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (* -1/6 (pow im 3))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (+ (* -1/6 (pow im 3)) (* 1/12 (* (pow im 3) (pow re 2))))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* -1/144 (* (pow im 3) (pow re 2))) (* 1/12 (pow im 3)))))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (+ (* -1/6 (pow im 3)) (* (pow re 2) (+ (* 1/12 (pow im 3)) (* (pow re 2) (+ (* -1/144 (pow im 3)) (* 1/4320 (* (pow im 3) (pow re 2))))))))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (* -1/6 (pow im 2))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (+ (* -1/6 (pow im 2)) (* 1/12 (* (pow im 2) (pow re 2))))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/144 (* (pow im 2) (pow re 2))) (* 1/12 (pow im 2)))))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* 1/12 (pow im 2)) (* (pow re 2) (+ (* -1/144 (pow im 2)) (* 1/4320 (* (pow im 2) (pow re 2))))))))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (pow im 2)))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (+ (* -1/2 (* (pow im 2) (pow re 2))) (pow im 2))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/2 (pow im 2)) (* 1/24 (* (pow im 2) (pow re 2))))) (pow im 2))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (+ (* (pow re 2) (+ (* -1/2 (pow im 2)) (* (pow re 2) (+ (* -1/720 (* (pow im 2) (pow re 2))) (* 1/24 (pow im 2)))))) (pow im 2))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* im (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* 1/24 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* 1/24 (* im (- (* -1/6 (pow im 2)) 1))))))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* -1/6 (pow im 2))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* 1/24 (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))) 1)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow im 2) (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* (pow im 2) (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* -1 (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* 1/2 (/ 1 (pow im 2)))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* 1/2 (/ 1 (pow im 2))) (* (pow re 2) (- (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2))))) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (/ -1 (pow im 2))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* 1/2 (/ (pow re 2) (pow im 2))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) (pow im 2))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) (pow im 2))) (* 1/24 (/ 1 (pow im 2))))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (+ (* -1 (* im (cos re))) (* -1/6 (* (pow im 3) (cos re))))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (* im im) (cos re)) -1/6) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (* im im) (cos re)) #s(hole binary64 (* (pow im 2) (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/2 (/ (- (exp (neg im)) (exp im)) (pow re 2)))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (cos re) (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* -1 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (neg im) #s(hole binary64 (* -1 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (neg im)) #s(hole binary64 1))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -2 (* im (+ 1/2 (* -1/4 (pow re 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/3 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/60 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/60 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/2520 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (pow im 2))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (neg im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (* -1 im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (* -1 im)) (exp im)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im)
(.f64 im (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
(.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))))))
(/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im)))))
(fma.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im (.f64 (neg.f64 im) (cos.f64 re)))
(fma.f64 (.f64 im (.f64 im (cos.f64 re))) (.f64 #s(literal -1/6 binary64) im) (.f64 (neg.f64 im) (cos.f64 re)))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))
(fma.f64 (.f64 im (cos.f64 re)) #s(literal -1 binary64) (.f64 (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))
(fma.f64 (neg.f64 im) (cos.f64 re) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))
(fma.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re)) (.f64 (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))
(fma.f64 im (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) (.f64 (neg.f64 im) (cos.f64 re)))
(fma.f64 im (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))
(-.f64 (/.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))))
(-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64))) im))
(+.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))
(+.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) (*.f64 (neg.f64 im) (cos.f64 re)))
(*.f64 #s(literal -1 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1 binary64))
(neg.f64 (cos.f64 re))
(sin.f64 (neg.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 re (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 re (PI.f64))))
(cos.f64 (+.f64 (neg.f64 re) (PI.f64)))
(cos.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 re (PI.f64)))
(sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 re)))
(cos.f64 (neg.f64 re))
(cos.f64 re)
(+.f64 (.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
re
im
(.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im)
(.f64 (.f64 im (.f64 im (cos.f64 re))) (.f64 #s(literal -1/6 binary64) im))
(.f64 im (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)))
(.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64))
(.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re))
(.f64 (.f64 im im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(.f64 #s(literal -1/6 binary64) (.f64 im (*.f64 im (cos.f64 re))))
(.f64 (.f64 im im) (cos.f64 re))
(.f64 im (.f64 im (cos.f64 re)))
(.f64 (cos.f64 re) (.f64 im im))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 im im)
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 im #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (-.f64 #s(literal 0 binary64) (.f64 im im))) (.f64 (+.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 0 binary64) im)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (.f64 (+.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (-.f64 #s(literal 0 binary64) (.f64 im im))) (.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im))) (+.f64 #s(literal 0 binary64) im)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im))) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(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))))
#s(literal -1/6 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
(*.f64 #s(literal -1 binary64) im)
(*.f64 im #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (+.f64 #s(literal 0 binary64) im)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (neg.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im))))
(neg.f64 im)
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im im) (+.f64 #s(literal 0 binary64) im)))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))) (/.f64 (.f64 (.f64 im im) im) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(-.f64 #s(literal 0 binary64) im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im)))) (neg.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(/.f64 (-.f64 (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))))
(-.f64 (/.f64 (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (/.f64 (exp.f64 (+.f64 im im)) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(-.f64 (/.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))) (/.f64 (exp.f64 (.f64 im #s(literal 3 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 im)
(+.f64 (cosh.f64 im) (sinh.f64 im))
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(/.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64))) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (.f64 (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64)))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64)))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(fma.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(+.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (neg.f64 (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))))) (neg.f64 (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))))
(/.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))
(/.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64)))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))))))
(-.f64 (/.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))) (/.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (+.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))
(-.f64 (/.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))) (/.f64 (.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))) (+.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))))))
(-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal -1 binary64)) im)
(pow.f64 (exp.f64 im) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (exp.f64 im)))
(/.f64 #s(literal 1 binary64) (exp.f64 im))
(-.f64 (cosh.f64 im) (sinh.f64 im))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) im))
(exp.f64 (neg.f64 im))
(+.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im)))
#s(approx (exp im) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 re (*.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (/.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 re re)))
(+.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)))
(*.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 re)))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (*.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))))
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im)
(.f64 im #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
(.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))
(.f64 (.f64 im im) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (*.f64 im im)))
(fma.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)))
(+.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)))
(+.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64))) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (/.f64 (cos.f64 re) (fabs.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (fabs.f64 im)) (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 #s(literal -1 binary64) (neg.f64 im)) (/.f64 (cos.f64 re) (neg.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (neg.f64 im)) (/.f64 #s(literal -1 binary64) (neg.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (cos.f64 re) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) im) (/.f64 #s(literal -1 binary64) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1 binary64) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))) (/.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))) (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal 1/6 binary64) (cos.f64 re)))
(+.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))
(+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (/.f64 (cos.f64 re) (fabs.f64 im)))
(*.f64 (/.f64 (cos.f64 re) (fabs.f64 im)) (/.f64 #s(literal -1 binary64) (fabs.f64 im)))
(*.f64 (/.f64 #s(literal -1 binary64) (neg.f64 im)) (/.f64 (cos.f64 re) (neg.f64 im)))
(*.f64 (/.f64 (cos.f64 re) (neg.f64 im)) (/.f64 #s(literal -1 binary64) (neg.f64 im)))
(*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (cos.f64 re) im))
(*.f64 (/.f64 (cos.f64 re) im) (/.f64 #s(literal -1 binary64) im))
(.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) (.f64 im im)))
(/.f64 (neg.f64 (/.f64 (neg.f64 (cos.f64 re)) im)) (neg.f64 im))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 re)))) (neg.f64 (neg.f64 (*.f64 im im))))
(/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)
(/.f64 (neg.f64 (neg.f64 (cos.f64 re))) (neg.f64 (*.f64 im im)))
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))
(neg.f64 (/.f64 (cos.f64 re) (*.f64 im im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 1/48 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64))) (*.f64 re re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (fma.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 #s(literal -1/1440 binary64) (.f64 re re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))) (.f64 re re))) (*.f64 re re))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (+.f64 (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (.f64 (.f64 re re) (fma.f64 #s(literal 1/12 binary64) (.f64 (.f64 im im) im) (*.f64 im #s(literal 1/2 binary64))))) (neg.f64 im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (+.f64 (fma.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 (.f64 im im) im) (fma.f64 (.f64 re re) (fma.f64 #s(literal -1/144 binary64) (.f64 (.f64 im im) im) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64)))) (.f64 re re) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/6 binary64))) (neg.f64 im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (+.f64 (fma.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 (.f64 im im) im) (fma.f64 (fma.f64 #s(literal -1/24 binary64) im (fma.f64 #s(literal -1/144 binary64) (.f64 (.f64 im im) im) (.f64 (.f64 re re) (fma.f64 #s(literal 1/720 binary64) im (.f64 #s(literal 1/4320 binary64) (.f64 (.f64 im im) im)))))) (.f64 re re) (.f64 im #s(literal 1/2 binary64)))) (.f64 re re) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/6 binary64))) (neg.f64 im)))
#s(approx (neg (cos re)) #s(literal -1 binary64))
#s(approx (neg (cos re)) (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re)) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re)) #s(literal 1 binary64)))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 re re) #s(literal 1/24 binary64)) (.f64 re re)) #s(literal 1/2 binary64)) (.f64 re re) #s(literal 1 binary64)))
#s(approx re re)
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/6 binary64)))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (.f64 (.f64 #s(literal 1/12 binary64) (.f64 (.f64 im im) im)) (*.f64 re re))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (.f64 (.f64 re re) (fma.f64 #s(literal 1/12 binary64) (.f64 (.f64 im im) im) (.f64 (.f64 #s(literal -1/144 binary64) (.f64 (.f64 im im) im)) (*.f64 re re))))))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) (fma.f64 (fma.f64 #s(literal 1/12 binary64) (.f64 (.f64 im im) im) (.f64 (.f64 re re) (fma.f64 #s(literal -1/144 binary64) (.f64 (.f64 im im) im) (.f64 (.f64 #s(literal 1/4320 binary64) (.f64 (.f64 im im) im)) (.f64 re re))))) (.f64 re re) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/6 binary64))))
#s(approx (* (* (* im im) (cos re)) -1/6) (.f64 (.f64 im im) #s(literal -1/6 binary64)))
#s(approx (* (* (* im im) (cos re)) -1/6) (fma.f64 (.f64 (.f64 im im) #s(literal 1/12 binary64)) (.f64 re re) (.f64 (*.f64 im im) #s(literal -1/6 binary64))))
#s(approx (* (* (* im im) (cos re)) -1/6) (fma.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/144 binary64)) (.f64 re re) (.f64 (.f64 im im) #s(literal 1/12 binary64))) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/6 binary64))))
#s(approx (* (* (* im im) (cos re)) -1/6) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/4320 binary64) (.f64 im im)) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/144 binary64))) (.f64 re re) (.f64 (.f64 im im) #s(literal 1/12 binary64))) (.f64 re re) (.f64 (*.f64 im im) #s(literal -1/6 binary64))))
#s(approx (* (* im im) (cos re)) (*.f64 im im))
#s(approx (* (* im im) (cos re)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/2 binary64)) (.f64 re re) (.f64 im im)))
#s(approx (* (* im im) (cos re)) (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 im im) #s(literal 1/24 binary64)) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/2 binary64))) (*.f64 im im)))
#s(approx (* (* im im) (cos re)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (.f64 re re) (.f64 (.f64 im im) #s(literal 1/24 binary64))) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/2 binary64))) (.f64 re re) (.f64 im im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* (* re re) -1/4) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* re re) (*.f64 re re))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 #s(literal -1/2 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (.f64 #s(literal -1/720 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) #s(literal 1/24 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (fma.f64 (.f64 im im) #s(literal -1/6 binary64) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) #s(literal -1/720 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) #s(literal 1/24 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))) (.f64 re re)) #s(literal 1 binary64))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 re re)) (.f64 im im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (fma.f64 (fma.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 im im) (neg.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re)) (.f64 im im)))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (fma.f64 (fma.f64 (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (.f64 re re)) (.f64 im im) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 im im)))) (.f64 re re) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 im im))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (-.f64 (-.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (-.f64 (-.f64 (.f64 (+.f64 (+.f64 (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re))) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (-.f64 (-.f64 (.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (.f64 (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (.f64 re re)) #s(literal 1/144 binary64)) (/.f64 #s(literal 1/24 binary64) (.f64 im im))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (/ (neg (cos re)) (* im im)) (/.f64 #s(literal -1 binary64) (*.f64 im im)))
#s(approx (/ (neg (cos re)) (* im im)) (/.f64 (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ (neg (cos re)) (* im im)) (-.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 im im)) (.f64 re re)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (/ (neg (cos re)) (* im im)) (-.f64 (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 im im)) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re)) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64) (.f64 (neg.f64 im) (cos.f64 re))))
#s(approx (neg (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (* (* (* im im) (cos re)) -1/6) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64)))
#s(approx (* (* (* im im) (cos re)) -1/6) (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)))
#s(approx (* (* im im) (cos re)) (.f64 im (.f64 im (cos.f64 re))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (/.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 re re)) #s(literal 1/2 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64))) (.f64 re re)))
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (*.f64 re re)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (.f64 im (cos.f64 re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))))
#s(approx (/ (neg (cos re)) (* im im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im (.f64 im (cos.f64 re))) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im (.f64 im (cos.f64 re))) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re))) im))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx im im)
#s(approx (* im im) (*.f64 im im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/120 binary64) (.f64 im im)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/5040 binary64) (.f64 im im)) #s(literal 1/120 binary64)) (.f64 im im)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (neg im) (neg.f64 im))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 #s(literal -2 binary64) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64)))
#s(approx (exp (neg im)) (fma.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp (neg im)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) im #s(literal 1/2 binary64)) im) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp im) #s(literal 1 binary64))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp im) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) im) #s(literal -2 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 im im)) #s(literal -1/3 binary64) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 im im)) #s(literal -1/60 binary64) (.f64 #s(literal -1/3 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -2 binary64) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 im im)) #s(literal -1/2520 binary64) (.f64 #s(literal -1/60 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -1/3 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (neg.f64 (cos.f64 re)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (neg.f64 (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (*.f64 im im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (exp im) (exp.f64 im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (* im im)) (.f64 (.f64 im (*.f64 im (cos.f64 re))) #s(literal -1/6 binary64)))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im))))

eval81.0ms (1.5%)

Memory: 19.8MiB live, 69.1MiB allocated; 56ms collecting garbage
Compiler: Compiled 5 386 to 1 998 computations (62.9% saved)

prune30.0ms (0.6%)

Memory

-5.4MiB live, 44.2MiB allocated; 6ms collecting garbage

Pruning

30 alts after pruning (25 fresh and 5 done)

	Pruned	Kept	Total
New	346	11	357
Fresh	3	14	17
Picked	3	2	5
Done	0	3	3
Total	352	30	382

Accuracy

100.0%

Counts

382 → 30

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))
✓	92.1%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
	52.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (.f64 im im))) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))))))
	20.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))))))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re)))))) im))
	60.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) im))
	53.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
	9.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
▶	40.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
✓	36.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
▶	25.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
▶	5.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
✓	88.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	55.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	54.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) im))
✓	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
▶	63.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im))
▶	63.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
	27.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im im))) im))
	38.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
	36.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	33.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	34.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
	54.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im)))))
✓	28.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	34.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))

Compiler

Compiled 1 509 to 1 370 computations (9.2% saved)

series30.0ms (0.5%)

Memory

-3.2MiB live, 42.7MiB allocated; 3ms collecting garbage

Counts

41 → 150

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im)
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im))
(.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) im)
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(cos.f64 re)
re
#s(literal -1/6 binary64)
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))
(neg.f64 (cos.f64 re))
(*.f64 im im)
im
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
(+.f64 #s(literal 1 binary64) im)
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
(fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))
(fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
(exp.f64 im)
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im)
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im)))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im))
(/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)
(/.f64 (neg.f64 (cos.f64 re)) im)

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* im (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* 1/24 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* 1/24 (* im (- (* -1/6 (pow im 2)) 1))))))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* -1/6 (pow im 2))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* 1/24 (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))) 1)))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow im 2) (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* (pow im 2) (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1 (* im (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (+ (* -1 (* im (+ 1/6 (/ 1 (pow im 2))))) (* im (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (+ (* -1 (* im (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* im (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* im (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (+ (* -1 (* im (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* im (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* im (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* im (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* -1 (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* 1/2 (/ 1 (pow im 2)))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* 1/2 (/ 1 (pow im 2))) (* (pow re 2) (- (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2))))) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (/ -1 (pow im 2))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* 1/2 (/ (pow re 2) (pow im 2))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) (pow im 2))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) (pow im 2))) (* 1/24 (/ 1 (pow im 2))))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (neg (cos re)) #s(hole binary64 -1))
#s(approx (neg (cos re)) #s(hole binary64 (- (* 1/2 (pow re 2)) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow im 2) (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* (pow im 2) (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (* -1 (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* -1 (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* 1/2 (/ 1 (pow im 2)))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* 1/2 (/ 1 (pow im 2))) (* (pow re 2) (- (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2))))) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (/ -1 (pow im 2))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (- (* 1/2 (/ (pow re 2) (pow im 2))) (/ 1 (pow im 2)))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) (pow im 2))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) (pow im 2))) (* 1/24 (/ 1 (pow im 2))))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (/ -1 im)))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (- (* 1/2 (/ (pow re 2) im)) (/ 1 im))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) im)) (* 1/2 (/ 1 im)))) (/ 1 im))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) im)) (* 1/24 (/ 1 im)))) (* 1/2 (/ 1 im)))) (/ 1 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (cos re) (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* im (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/2 (/ (- (exp (neg im)) (exp im)) (pow re 2)))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (* -1 (/ (cos re) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1 (/ (cos re) im))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) im)))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (pow im 2))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* -1 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (neg im)) #s(hole binary64 1))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (+ 1 im) #s(hole binary64 1))
#s(approx (+ 1 im) #s(hole binary64 (+ 1 im)))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 im)))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 1))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 (+ 1 (* 1/2 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -2 (* im (+ 1/2 (* -1/4 (pow re 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/3 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/60 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/60 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/2520 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (pow im 2))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1/6 (* im (cos re)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (+ 1 im) #s(hole binary64 im))
#s(approx (+ 1 im) #s(hole binary64 (* im (+ 1 (/ 1 im)))))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (* 1/2 (pow im 2))))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (* (pow im 2) (+ 1/2 (/ 1 im)))))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (* (pow im 2) (+ 1/2 (+ (/ 1 im) (/ 1 (pow im 2)))))))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 (* 1/2 im)))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 (* im (+ 1/2 (/ 1 im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (neg im)) (exp im)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1 (* im (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (* -1 im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (* -1 im)) (exp im)))))

Calls

6 calls:

Time	Variable		Point	Expression
10.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (cos re) re -1/6 (/ (neg (cos re)) (* im im)) (neg (cos re)) (* im im) im (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (+ 1 im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp im) (+ (* (+ (* im 1/2) 1) im) 1) (+ (* im 1/2) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/ (/ (neg (cos re)) im) im) (/ (neg (cos re)) im))
4.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (cos re) re -1/6 (/ (neg (cos re)) (* im im)) (neg (cos re)) (* im im) im (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (+ 1 im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp im) (+ (* (+ (* im 1/2) 1) im) 1) (+ (* im 1/2) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/ (/ (neg (cos re)) im) im) (/ (neg (cos re)) im))
4.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (cos re) re -1/6 (/ (neg (cos re)) (* im im)) (neg (cos re)) (* im im) im (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (+ 1 im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp im) (+ (* (+ (* im 1/2) 1) im) 1) (+ (* im 1/2) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/ (/ (neg (cos re)) im) im) (/ (neg (cos re)) im))
3.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (cos re) re -1/6 (/ (neg (cos re)) (* im im)) (neg (cos re)) (* im im) im (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (+ 1 im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp im) (+ (* (+ (* im 1/2) 1) im) 1) (+ (* im 1/2) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/ (/ (neg (cos re)) im) im) (/ (neg (cos re)) im))
3.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) (cos re) re -1/6 (/ (neg (cos re)) (* im im)) (neg (cos re)) (* im im) im (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (+ 1 im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp im) (+ (* (+ (* im 1/2) 1) im) 1) (+ (* im 1/2) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (- (exp (neg im)) (exp im)) (exp im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/ (/ (neg (cos re)) im) im) (/ (neg (cos re)) im))

rewrite261.0ms (4.8%)

Memory

21.5MiB live, 246.0MiB allocated; 33ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	560	4353
0	600	4084
1	3056	4026
0	11518	3882

Stop Event

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

Counts

191 → 455

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im)
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im))
(.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) im)
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(cos.f64 re)
re
#s(literal -1/6 binary64)
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))
(neg.f64 (cos.f64 re))
(*.f64 im im)
im
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
(+.f64 #s(literal 1 binary64) im)
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
(fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))
(fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
(exp.f64 im)
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im)
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im)))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im))
(/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)
(/.f64 (neg.f64 (cos.f64 re)) im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* im (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* 1/24 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (+ (* im (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/6 (pow im 2)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))) (* 1/24 (* im (- (* -1/6 (pow im 2)) 1))))))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (* -1/6 (pow im 2)) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* -1/6 (pow im 2))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* 1/24 (* (pow re 2) (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/6 (pow im 2)) 1))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))) 1)))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow im 2) (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* (pow im 2) (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1 (* im (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (+ (* -1 (* im (+ 1/6 (/ 1 (pow im 2))))) (* im (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (+ (* -1 (* im (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* im (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* im (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (+ (* -1 (* im (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* im (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* im (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* im (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* -1 (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* 1/2 (/ 1 (pow im 2)))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* 1/2 (/ 1 (pow im 2))) (* (pow re 2) (- (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2))))) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (cos re) #s(hole binary64 1))
#s(approx (cos re) #s(hole binary64 (+ 1 (* -1/2 (pow re 2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))))
#s(approx (cos re) #s(hole binary64 (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))))
#s(approx re #s(hole binary64 re))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (/ -1 (pow im 2))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* 1/2 (/ (pow re 2) (pow im 2))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) (pow im 2))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) (pow im 2))) (* 1/24 (/ 1 (pow im 2))))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (neg (cos re)) #s(hole binary64 -1))
#s(approx (neg (cos re)) #s(hole binary64 (- (* 1/2 (pow re 2)) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)))
#s(approx (neg (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 1/2))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow im 2) (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2)))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))) (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* (pow im 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (* (pow re 2) (+ (* -1 (* (pow im 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* (pow im 2) (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2)))))))))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (* -1 (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* 1/2 (/ 1 (pow im 2))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* -1 (* (pow re 2) (+ 1/144 (* 1/24 (/ 1 (pow im 2)))))) (* 1/2 (/ 1 (pow im 2)))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (+ (* 1/2 (/ 1 (pow im 2))) (* (pow re 2) (- (* (pow re 2) (+ 1/4320 (* 1/720 (/ 1 (pow im 2))))) (+ 1/144 (* 1/24 (/ 1 (pow im 2))))))))) (+ 1/6 (/ 1 (pow im 2))))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (/ -1 (pow im 2))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (- (* 1/2 (/ (pow re 2) (pow im 2))) (/ 1 (pow im 2)))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) (pow im 2))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) (pow im 2))) (* 1/24 (/ 1 (pow im 2))))) (* 1/2 (/ 1 (pow im 2))))) (/ 1 (pow im 2)))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (/ -1 im)))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (- (* 1/2 (/ (pow re 2) im)) (/ 1 im))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (- (* (pow re 2) (+ (* -1/24 (/ (pow re 2) im)) (* 1/2 (/ 1 im)))) (/ 1 im))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (- (* (pow re 2) (+ (* (pow re 2) (- (* 1/720 (/ (pow re 2) im)) (* 1/24 (/ 1 im)))) (* 1/2 (/ 1 im)))) (/ 1 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/6 (pow im 2)) 1)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (cos re) (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* im (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (/ (neg (cos re)) (* im im)) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/2 (/ (- (exp (neg im)) (exp im)) (pow re 2)))))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(hole binary64 (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))))
#s(approx (/ (/ (neg (cos re)) im) im) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (/ (neg (cos re)) im) #s(hole binary64 (* -1 (/ (cos re) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1 (/ (cos re) im))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) im)))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (pow im 2))))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx im #s(hole binary64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* -1 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* -1/6 (pow im 2)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* -2 im)))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* -1/3 (pow im 2)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))))
#s(approx (exp (neg im)) #s(hole binary64 1))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (exp (neg im)) #s(hole binary64 (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))))
#s(approx (exp im) #s(hole binary64 1))
#s(approx (exp im) #s(hole binary64 (+ 1 im)))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (exp im) #s(hole binary64 (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))))
#s(approx (+ 1 im) #s(hole binary64 1))
#s(approx (+ 1 im) #s(hole binary64 (+ 1 im)))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 1))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 im)))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 (* im (+ 1 (* 1/2 im))))))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 1))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 (+ 1 (* 1/2 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* -2 (* im (+ 1/2 (* -1/4 (pow re 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/3 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/60 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* im (+ (* -2 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/3 (+ 1/2 (* -1/4 (pow re 2)))) (* (pow im 2) (+ (* -1/60 (+ 1/2 (* -1/4 (pow re 2)))) (* -1/2520 (* (pow im 2) (+ 1/2 (* -1/4 (pow re 2)))))))))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (* -1 (/ (cos re) (pow im 2)))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (/ (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (pow im 2))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) #s(hole binary64 (* (pow im 2) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))))
#s(approx (* (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) im) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1/6 (* im (cos re)))))
#s(approx (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (neg im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (neg im))))
#s(approx (exp im) #s(hole binary64 (exp im)))
#s(approx (+ 1 im) #s(hole binary64 im))
#s(approx (+ 1 im) #s(hole binary64 (* im (+ 1 (/ 1 im)))))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (* 1/2 (pow im 2))))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (* (pow im 2) (+ 1/2 (/ 1 im)))))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(hole binary64 (* (pow im 2) (+ 1/2 (+ (/ 1 im) (/ 1 (pow im 2)))))))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 (* 1/2 im)))
#s(approx (+ (* im 1/2) 1) #s(hole binary64 (* im (+ 1/2 (/ 1 im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (neg im)) (exp im)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) #s(hole binary64 (* -1 (* im (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(hole binary64 (* 1/2 (- (exp (* -1 im)) (exp im)))))
#s(approx (- (exp (neg im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (neg im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) #s(hole binary64 (* (+ 1/2 (* -1/4 (pow re 2))) (- (exp (* -1 im)) (exp im)))))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im)
(.f64 im #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))
(.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)
(.f64 (.f64 im im) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))))
(.f64 im (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))) (.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (-.f64 (.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))) (.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (*.f64 im im)))
(fma.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 (.f64 im im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(+.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)))
(+.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) im)
(.f64 im (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) im) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) im) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) im) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im)) (.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) im) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im)))))
(/.f64 (+.f64 (pow.f64 (.f64 im (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re))) #s(literal 3 binary64))) (fma.f64 (.f64 im (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (-.f64 (.f64 (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re)))) (.f64 (.f64 im (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) im (.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 re)) im))
(fma.f64 im (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(+.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) im) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im))
(+.f64 (.f64 im (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64))) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (/.f64 (cos.f64 re) (fabs.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (fabs.f64 im)) (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (neg.f64 im)) (/.f64 #s(literal 1 binary64) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) im) (/.f64 #s(literal -1 binary64) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1 binary64) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (cos.f64 re) (neg.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (cos.f64 re) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))) (/.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))) (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal 1/6 binary64) (cos.f64 re)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))) (/.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))))
(+.f64 (/.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))) (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(+.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))
(+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 re)))
(cos.f64 (neg.f64 re))
(cos.f64 re)
(+.f64 (.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
re
#s(literal -1/6 binary64)
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (/.f64 (cos.f64 re) (fabs.f64 im)))
(*.f64 (/.f64 (cos.f64 re) (fabs.f64 im)) (/.f64 #s(literal -1 binary64) (fabs.f64 im)))
(*.f64 (/.f64 (cos.f64 re) (neg.f64 im)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (cos.f64 re) im) (/.f64 #s(literal -1 binary64) im))
(.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (cos.f64 re) (neg.f64 im)))
(*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (cos.f64 re) im))
(.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) (.f64 im im)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 re) im)))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 re)))) (neg.f64 (neg.f64 (*.f64 im im))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 re) im))) (neg.f64 im))
(/.f64 (neg.f64 (neg.f64 (cos.f64 re))) (neg.f64 (*.f64 im im)))
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))
(/.f64 (neg.f64 (/.f64 (cos.f64 re) im)) im)
(neg.f64 (/.f64 (cos.f64 re) (*.f64 im im)))
(*.f64 #s(literal -1 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1 binary64))
(neg.f64 (cos.f64 re))
(sin.f64 (neg.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 re (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 re (PI.f64))))
(cos.f64 (+.f64 (neg.f64 re) (PI.f64)))
(cos.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 re (PI.f64)))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 im im)
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 im #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (-.f64 #s(literal 0 binary64) (.f64 im im))) (.f64 (+.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 0 binary64) im)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (.f64 (+.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (-.f64 #s(literal 0 binary64) (.f64 im im))) (.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im))) (+.f64 #s(literal 0 binary64) im)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im))) (+.f64 #s(literal 0 binary64) (fma.f64 im im (.f64 #s(literal 0 binary64) im)))))
(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
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))) (neg.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (.f64 (.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))) (neg.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))))
(/.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (.f64 (.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))))
(-.f64 (/.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))) (/.f64 (.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
(-.f64 (/.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))) (/.f64 (.f64 (.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
(/.f64 (fma.f64 (.f64 im im) im #s(literal 1 binary64)) (fma.f64 im im (-.f64 #s(literal 1 binary64) (.f64 im #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 im im) im))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 im im) (.f64 #s(literal 1 binary64) im)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 1 binary64) im)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) im))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 im im) im)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 im im) (.f64 #s(literal 1 binary64) im))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) im)) (/.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) im)))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 im im) (.f64 #s(literal 1 binary64) im)))) (/.f64 (.f64 (.f64 im im) im) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 im im) (.f64 #s(literal 1 binary64) im)))))
(+.f64 #s(literal 1 binary64) im)
(+.f64 im #s(literal 1 binary64))
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))))) (neg.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (pow.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))))
(/.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (pow.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(literal 3 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))))))
(-.f64 (/.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))) (/.f64 (.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))
(-.f64 (/.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))) (/.f64 (pow.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(literal 3 binary64)) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) #s(literal 1 binary64))) (neg.f64 (-.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)))) (neg.f64 (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))))))
(/.f64 (-.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) #s(literal 1 binary64)) (-.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))) (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)))))
(fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))
(fma.f64 im (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) #s(literal 1 binary64))
(-.f64 (/.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) (-.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))) (/.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 im) (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))))
(+.f64 (/.f64 (pow.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 3 binary64)) (fma.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) (.f64 #s(literal 1 binary64) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))))) (/.f64 (pow.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 3 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) (.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) (.f64 #s(literal 1 binary64) (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))))))
(+.f64 (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)) im)
(*.f64 im (+.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im) (pow.f64 (.f64 im (/.f64 #s(literal 1 binary64) im)) #s(literal 3 binary64))) (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 (.f64 (.f64 im (/.f64 #s(literal 1 binary64) im)) (.f64 im (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 im (/.f64 #s(literal 1 binary64) im))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))))) (neg.f64 (-.f64 #s(literal 1 binary64) (.f64 im #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im) #s(literal 1 binary64))) (neg.f64 (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 #s(literal 1 binary64) (.f64 im #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) #s(literal 1 binary64))) (neg.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) #s(literal 1 binary64)) (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 im #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im) #s(literal 1 binary64)) (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 #s(literal 1 binary64) (.f64 im #s(literal 1/2 binary64))))))
(fma.f64 im #s(literal 1/2 binary64) (*.f64 im (/.f64 #s(literal 1 binary64) im)))
(fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) im (*.f64 im (/.f64 #s(literal 1 binary64) im)))
(fma.f64 #s(literal 1/2 binary64) im #s(literal 1 binary64))
(-.f64 (/.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (.f64 im #s(literal 1/2 binary64)))) (/.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 im #s(literal 1/2 binary64)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) im))
(+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im)) (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 #s(literal 1 binary64) (.f64 im #s(literal 1/2 binary64)))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im)) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 #s(literal 1 binary64) (*.f64 im #s(literal 1/2 binary64)))))))
(+.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im (/.f64 #s(literal 1 binary64) im)))
(+.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 im #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))
(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))) (.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(/.f64 (.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im)))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(/.f64 (.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(fma.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(+.f64 (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im)))) (neg.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(/.f64 (-.f64 (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (+.f64 im im))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))
(/.f64 (-.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))))
(-.f64 (/.f64 (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))) (/.f64 (exp.f64 (+.f64 im im)) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(-.f64 (/.f64 (.f64 (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64))) #s(approx (exp (neg im)) #s(literal 1 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))) (/.f64 (exp.f64 (.f64 im #s(literal 3 binary64))) (fma.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (+.f64 (exp.f64 (+.f64 im im)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
(/.f64 (+.f64 (pow.f64 (cosh.f64 im) #s(literal 3 binary64)) (pow.f64 (sinh.f64 im) #s(literal 3 binary64))) (fma.f64 (cosh.f64 im) (cosh.f64 im) (-.f64 (.f64 (sinh.f64 im) (sinh.f64 im)) (.f64 (cosh.f64 im) (sinh.f64 im)))))
(exp.f64 im)
(+.f64 (cosh.f64 im) (sinh.f64 im))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(literal 1/4 binary64)) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) #s(literal -1/64 binary64) #s(literal 1/8 binary64)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64))))))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 re (*.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) (/.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 re re)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1/8 binary64) (fma.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))))
(+.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))) (/.f64 (pow.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))))
(+.f64 (.f64 (.f64 re re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)))
(*.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 re)))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (*.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))))
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
(.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im)
(.f64 im #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
(.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))
(.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)
(.f64 (.f64 im im) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))))
(.f64 im (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))) (.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) #s(literal 3 binary64))) (fma.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (-.f64 (.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))) (.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(fma.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (*.f64 im im)))
(fma.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 (.f64 im im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(+.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)))
(+.f64 (.f64 (.f64 im im) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64))) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))))
(fma.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (/.f64 (cos.f64 re) (fabs.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (fabs.f64 im)) (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (neg.f64 im)) (/.f64 #s(literal 1 binary64) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) im) (/.f64 #s(literal -1 binary64) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1 binary64) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (cos.f64 re) (neg.f64 im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (cos.f64 re) im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))) (/.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))) (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(-.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal 1/6 binary64) (cos.f64 re)))
(+.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))) (/.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))))
(+.f64 (/.f64 (pow.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))) (/.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 3 binary64)) (+.f64 (pow.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(+.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))
(+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(*.f64 (/.f64 #s(literal -1 binary64) (fabs.f64 im)) (/.f64 (cos.f64 re) (fabs.f64 im)))
(*.f64 (/.f64 (cos.f64 re) (fabs.f64 im)) (/.f64 #s(literal -1 binary64) (fabs.f64 im)))
(*.f64 (/.f64 (cos.f64 re) (neg.f64 im)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (cos.f64 re) im) (/.f64 #s(literal -1 binary64) im))
(.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (cos.f64 re) (neg.f64 im)))
(*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (cos.f64 re) im))
(.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) (.f64 im im)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 re) im)))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 re)))) (neg.f64 (neg.f64 (*.f64 im im))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 re) im))) (neg.f64 im))
(/.f64 (neg.f64 (neg.f64 (cos.f64 re))) (neg.f64 (*.f64 im im)))
(/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))
(/.f64 (neg.f64 (/.f64 (cos.f64 re) im)) im)
(neg.f64 (/.f64 (cos.f64 re) (*.f64 im im)))
(*.f64 (/.f64 (cos.f64 re) im) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 re) im))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (cos.f64 re)))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 re))) (neg.f64 im))
(/.f64 (neg.f64 (cos.f64 re)) im)
(neg.f64 (/.f64 (cos.f64 re) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (.f64 (.f64 re re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 1/48 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64))) (*.f64 re re))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64) (.f64 (fma.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64) (.f64 (fma.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (.f64 #s(literal -1/1440 binary64) (.f64 re re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))) (.f64 re re))) (*.f64 re re))))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (fma.f64 (.f64 #s(literal -1/2 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))) (.f64 re re) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 re re)) (.f64 #s(literal 1/24 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (fma.f64 (.f64 im im) #s(literal -1/6 binary64) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re)) #s(literal 1 binary64))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 re re)) (.f64 im im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (fma.f64 (fma.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 im im) (neg.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re)) (.f64 im im)))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) (.f64 re re)) (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 im im)))) (.f64 re re) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 im im))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (*.f64 re re)) im (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (fma.f64 (fma.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) im (.f64 (neg.f64 im) (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re)))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (fma.f64 (fma.f64 (fma.f64 (.f64 im (.f64 re re)) (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (.f64 (neg.f64 im) (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)))) (.f64 re re) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) im)) (*.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (-.f64 (-.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (-.f64 (-.f64 (.f64 (+.f64 (+.f64 (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re))) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (-.f64 (-.f64 (.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (.f64 (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (.f64 re re)) #s(literal 1/144 binary64)) (/.f64 #s(literal 1/24 binary64) (.f64 im im))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal 1 binary64)))
#s(approx (cos re) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 re re) #s(literal 1/24 binary64)) (.f64 re re)) #s(literal 1/2 binary64)) (.f64 re re) #s(literal 1 binary64)))
#s(approx re re)
#s(approx (/ (/ (neg (cos re)) im) im) (/.f64 #s(literal -1 binary64) (*.f64 im im)))
#s(approx (/ (/ (neg (cos re)) im) im) (/.f64 (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ (/ (neg (cos re)) im) im) (-.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 im im)) (.f64 re re)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (/ (/ (neg (cos re)) im) im) (-.f64 (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 im im)) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re)) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (neg (cos re)) #s(literal -1 binary64))
#s(approx (neg (cos re)) (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re)) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re)) #s(literal 1 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (+ (* (* re re) -1/4) 1/2) #s(literal 1/2 binary64))
#s(approx (+ (* (* re re) -1/4) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* re re) (*.f64 re re))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (fma.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 re re)) (.f64 im im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (fma.f64 (fma.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 im im) (neg.f64 (.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re)) (.f64 im im)))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) (.f64 re re)) (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 im im)))) (.f64 re re) (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 im im))) (.f64 re re) (neg.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 im im) #s(literal 1 binary64)))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (-.f64 (-.f64 (.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (-.f64 (-.f64 (.f64 (+.f64 (+.f64 (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/24 binary64) (.f64 im im)) #s(literal 1/144 binary64)) (.f64 re re))) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (-.f64 (-.f64 (.f64 (+.f64 (fma.f64 (-.f64 (-.f64 (.f64 (+.f64 (/.f64 #s(literal 1/720 binary64) (.f64 im im)) #s(literal 1/4320 binary64)) (.f64 re re)) #s(literal 1/144 binary64)) (/.f64 #s(literal 1/24 binary64) (.f64 im im))) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) #s(literal 1/12 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (/ (/ (neg (cos re)) im) im) (/.f64 #s(literal -1 binary64) (*.f64 im im)))
#s(approx (/ (/ (neg (cos re)) im) im) (/.f64 (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 im im)))
#s(approx (/ (/ (neg (cos re)) im) im) (-.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 im im)) (.f64 re re)) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
#s(approx (/ (/ (neg (cos re)) im) im) (-.f64 (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 im im)) (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im))) (.f64 re re)) (/.f64 #s(literal 1 binary64) (.f64 im im))))
#s(approx (/ (neg (cos re)) im) (/.f64 #s(literal -1 binary64) im))
#s(approx (/ (neg (cos re)) im) (/.f64 (-.f64 (.f64 (.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))
#s(approx (/ (neg (cos re)) im) (-.f64 (.f64 (/.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)))
#s(approx (/ (neg (cos re)) im) (-.f64 (.f64 (fma.f64 (/.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) im) (.f64 re re) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 im (cos.f64 re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) im))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))))
#s(approx (cos re) (cos.f64 re))
#s(approx (/ (/ (neg (cos re)) im) im) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
#s(approx (neg (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (/.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 re re)) #s(literal 1/2 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -1/4 binary64))) (.f64 re re)))
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (*.f64 re re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))))
#s(approx (/ (/ (neg (cos re)) im) im) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
#s(approx (/ (neg (cos re)) im) (neg.f64 (/.f64 (cos.f64 re) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) (.f64 im im)) (cos.f64 re) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) (.f64 im im)) (cos.f64 re) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re))) im))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (neg.f64 (cos.f64 re)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (neg.f64 (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (/.f64 (cos.f64 re) im)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (*.f64 im im)))
#s(approx (* im im) (*.f64 im im))
#s(approx im im)
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/120 binary64) (.f64 im im)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/5040 binary64) (.f64 im im)) #s(literal 1/120 binary64)) (.f64 im im)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 #s(literal -2 binary64) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (neg.f64 im)))
#s(approx (exp (neg im)) (fma.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp (neg im)) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) im #s(literal 1/2 binary64)) im) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp im) #s(literal 1 binary64))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
#s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (exp im) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (+ 1 im) #s(literal 1 binary64))
#s(approx (+ 1 im) (+.f64 #s(literal 1 binary64) im))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) (+.f64 #s(literal 1 binary64) im))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))
#s(approx (+ (* im 1/2) 1) #s(literal 1 binary64))
#s(approx (+ (* im 1/2) 1) (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) im) #s(literal -2 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 im im)) #s(literal -1/3 binary64) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 im im)) #s(literal -1/60 binary64) (.f64 #s(literal -1/3 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -2 binary64) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (.f64 im im)) #s(literal -1/2520 binary64) (.f64 #s(literal -1/60 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -1/3 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 im im) (.f64 #s(literal -2 binary64) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) im))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (neg.f64 (cos.f64 re)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im)))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (*.f64 im im)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 (.f64 im im) im) (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)))))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im)))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (.f64 (.f64 im (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (exp im) (exp.f64 im))
#s(approx (+ 1 im) im)
#s(approx (+ 1 im) (fma.f64 #s(literal 1 binary64) im #s(literal 1 binary64)))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im))
#s(approx (+ (* (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im)))
#s(approx (+ (* im 1/2) 1) (*.f64 im #s(literal 1/2 binary64)))
#s(approx (+ (* im 1/2) 1) (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (* im im)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64)))
#s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im))))
#s(approx (* (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (.f64 (neg.f64 im) (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im)))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) (+ (* (* re re) -1/4) 1/2)) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))

eval51.0ms (0.9%)

Memory: -7.5MiB live, 94.7MiB allocated; 12ms collecting garbage
Compiler: Compiled 6 704 to 2 619 computations (60.9% saved)

prune37.0ms (0.7%)

Memory

26.0MiB live, 72.5MiB allocated; 2ms collecting garbage

Pruning

37 alts after pruning (31 fresh and 6 done)

	Pruned	Kept	Total
New	382	13	395
Fresh	2	18	20
Picked	4	1	5
Done	0	5	5
Total	388	37	425

Accuracy

100.0%

Counts

425 → 37

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))
✓	92.1%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
	52.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (.f64 im im))) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))))))
	20.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))))))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re)))))) im))
	60.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) im))
	9.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
	10.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	16.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
✓	36.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
	23.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
	23.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im))))) #s(literal 1/2 binary64)))
	23.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
	3.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
	3.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
✓	88.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	55.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	54.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) im))
✓	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	31.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))) (.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))))))) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
✓	63.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im))
	38.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))
	28.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
	27.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im im))) im))
	53.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
	54.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (/.f64 (cos.f64 re) im))) im)) im))
	36.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	33.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	34.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
	53.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
	54.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im)))))
✓	28.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	34.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))

Compiler

Compiled 1 818 to 1 352 computations (25.6% saved)

regimes87.0ms (1.6%)

Memory

-23.3MiB live, 161.0MiB allocated; 20ms collecting garbage

Counts

52 → 2

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (/.f64 (cos.f64 re) im))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im im))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (.f64 im im))) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 re (PI.f64)))))) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (neg.f64 (cos.f64 re)))))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im (.f64 im (cos.f64 re))) #s(literal -1/6 binary64)) im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 im) (cos.f64 re)) (-.f64 (.f64 (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) #s(literal 3 binary64))) (fma.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (-.f64 (.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))) (.f64 (.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im)) (.f64 im im)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im))))))) im))

Outputs

(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))

(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Calls

6 calls:

19.0ms	re
15.0ms	im
14.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
12.0ms	(cos.f64 re)
12.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))

Results

Accuracy	Segments	Branch
99.9%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
92.1%	1	`(cos.f64 re)`
92.1%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
99.9%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
92.1%	1	`re`
99.9%	2	`im`

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes36.0ms (0.7%)

Memory

42.6MiB live, 84.0MiB allocated; 14ms collecting garbage

Counts

37 → 3

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (/.f64 (cos.f64 re) im))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im im))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))

(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ (* (* re re) -1/4) 1/2) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))

Calls

3 calls:

17.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
10.0ms	im
7.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
99.5%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
92.1%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
98.3%	3	`im`

Compiler

Compiled 18 to 20 computations (-11.1% saved)

regimes32.0ms (0.6%)

Memory

-33.4MiB live, 21.9MiB allocated; 39ms collecting garbage

Counts

36 → 3

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (/.f64 (cos.f64 re) im))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im im))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (*.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ (* (* re re) -1/4) 1/2) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))

Calls

1 calls:

7.0ms

(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
99.4%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 11 to 11 computations (0% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

32 → 3

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (/.f64 (cos.f64 re) im))) im)) im))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ (* (* re re) -1/4) 1/2) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))

Calls

1 calls:

6.0ms

(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
99.2%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 11 to 11 computations (0% saved)

regimes83.0ms (1.5%)

Memory

-28.6MiB live, 64.4MiB allocated; 10ms collecting garbage

Counts

30 → 3

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 im im))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (*.f64 (*.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(approx (+ (* (* re re) -1/4) 1/2) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))

Calls

6 calls:

37.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
15.0ms	im
8.0ms	re
8.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
7.0ms	(cos.f64 re)

Results

Accuracy	Segments	Branch
64.5%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
57.4%	2	`re`
67.1%	2	`(cos.f64 re)`
67.1%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
64.5%	2	`im`
74.2%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

21 → 3

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx (+ ( (cos re) -1/6) (/ (neg (cos re)) (* im im))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/6 binary64)))) (.f64 im im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 #s(approx (+ (* (cos re) -1/6) (/ (/ (neg (cos re)) im) im)) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)))) im) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (fma.f64 #s(approx (cos re) #s(literal 1 binary64)) #s(literal -1/6 binary64) (/.f64 (/.f64 (neg.f64 #s(approx (cos re) #s(literal 1 binary64))) im) im)) (.f64 im im))) im))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (*.f64 (*.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))

Calls

1 calls:

4.0ms

(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
70.2%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 11 to 11 computations (0% saved)

regimes18.0ms (0.3%)

Memory

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

Counts

13 → 2

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (.f64 (.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (fma.f64 (*.f64 im im) #s(literal 1/2 binary64) im)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 #s(approx ( (+ (* (cos re) -1/6) (/ (neg (cos re)) (* im im))) im) (neg.f64 (fma.f64 #s(literal 1/6 binary64) im (/.f64 #s(literal 1 binary64) im)))) im)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64)))) #s(literal 1/2 binary64)))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (neg (cos re)) im) (* (* (* (* im im) (cos re)) -1/6) im)) (fma.f64 (*.f64 (*.f64 im im) im) #s(literal -1/6 binary64) (neg.f64 im))))

Calls

5 calls:

4.0ms	im
4.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
4.0ms	(cos.f64 re)
3.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
3.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))

Results

Accuracy	Segments	Branch
53.1%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
53.1%	1	`im`
63.2%	2	`(cos.f64 re)`
63.2%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
63.1%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 24 to 28 computations (-16.7% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

8 → 2

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (* (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (*.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))

Calls

2 calls:

3.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
3.0ms	(cos.f64 re)

Results

Accuracy	Segments	Branch
63.2%	2	`(cos.f64 re)`
63.2%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes18.0ms (0.3%)

Memory

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

Counts

5 → 2

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))

Calls

6 calls:

8.0ms	(cos.f64 re)
2.0ms	im
2.0ms	re
2.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
2.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
37.9%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
37.9%	2	`im`
34.7%	1	`re`
38.5%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
38.6%	2	`(cos.f64 re)`
38.6%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes10.0ms (0.2%)

Memory

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

Accuracy

Total -17.0b remaining (-37.2%)

Threshold costs -17b (-37.2%)

Counts

4 → 1

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(approx (+ ( (+ (* im 1/2) 1) im) 1) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))

Calls

6 calls:

2.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
2.0ms	im
2.0ms	re
2.0ms	(cos.f64 re)
1.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
28.4%	1	`re`
28.4%	1	`im`
28.4%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
28.4%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
28.4%	1	`(cos.f64 re)`
28.4%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`

Compiler

Compiled 25 to 30 computations (-20% saved)

bsearch25.0ms (0.4%)

Memory

-24.5MiB live, 21.9MiB allocated; 12ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	0.0042738065855064435	237.74073441671135

Samples

18.0ms

128×

valid

Compiler

Compiled 279 to 296 computations (-6.1% saved)

Precisions

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

ival-exp: 9.0ms (61.4% of total)

ival-cos: 3.0ms (20.5% of total)

ival-sub!: 1.0ms (6.8% of total)

ival-mult!: 1.0ms (6.8% of total)

adjust: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004212440080318002	8.766457023970952e+102
0.0ms	-inf	-3.1274450936202847e-6

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004212440080318002	8.766457023970952e+102
0.0ms	-inf	-3.1274450936202847e-6

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.004212440080318002	8.766457023970952e+102
0.0ms	-inf	-3.1274450936202847e-6

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	3.378533226395181e-9
0.0ms	-inf	-3.1274450936202847e-6

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	3.378533226395181e-9
0.0ms	-inf	-3.1274450936202847e-6

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.0427271581550488	-0.022739337107640267

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.0427271581550488	-0.022739337107640267

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.0427271581550488	-0.022739337107640267

Compiler

Compiled 15 to 16 computations (-6.7% saved)

derivations366.0ms (6.7%)

Memory

-1.5MiB live, 271.9MiB allocated; 33ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 178 to 114 computations (36% saved)

preprocess252.0ms (4.6%)

Memory

47.2MiB live, 327.2MiB allocated; 78ms collecting garbage

Remove

(negabs im)

(abs re)

Compiler

Compiled 3 181 to 2 385 computations (25% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample3.1s (56.9%)

preprocess37.0ms (0.7%)

series9.0ms (0.2%)

rewrite201.0ms (3.7%)

eval10.0ms (0.2%)

prune7.0ms (0.1%)

series144.0ms (2.6%)

rewrite213.0ms (3.9%)

eval52.0ms (1%)

prune49.0ms (0.9%)

series34.0ms (0.6%)

rewrite172.0ms (3.1%)

eval81.0ms (1.5%)

prune30.0ms (0.6%)

series30.0ms (0.5%)

rewrite261.0ms (4.8%)

eval51.0ms (0.9%)

prune37.0ms (0.7%)

regimes87.0ms (1.6%)

regimes36.0ms (0.7%)

regimes32.0ms (0.6%)

regimes8.0ms (0.1%)

regimes83.0ms (1.5%)

regimes6.0ms (0.1%)

regimes18.0ms (0.3%)

regimes6.0ms (0.1%)

regimes18.0ms (0.3%)

regimes10.0ms (0.2%)

bsearch25.0ms (0.4%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations366.0ms (6.7%)

preprocess252.0ms (4.6%)

end0.0ms (0%)

Profiling