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.7MiB live, 0.7MiB 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)

sample2.5s (45.5%)

Memory

99.4MiB live, 3 301.5MiB allocated; 771ms collecting garbage

Samples

979.0ms	1 706×	2	valid
760.0ms	2 374×	1	valid
413.0ms	4 176×	0	valid

Precisions

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

ival-exp: 1.0s (59% of total)

ival-cos: 313.0ms (18.1% of total)

ival-mult!: 145.0ms (8.4% of total)

adjust: 137.0ms (7.9% of total)

ival-sub!: 114.0ms (6.6% of total)

Bogosity

preprocess79.0ms (1.5%)

Memory

-10.1MiB live, 45.7MiB allocated; 60ms 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
▶	51.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

20.5MiB live, 20.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))

rewrite178.0ms (3.3%)

Memory

0.9MiB live, 281.9MiB allocated; 30ms 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: 26.2MiB live, 26.2MiB allocated; 0ms collecting garbage
Compiler: Compiled 916 to 457 computations (50.1% saved)

prune9.0ms (0.2%)

Memory

-27.5MiB live, 19.2MiB allocated; 3ms collecting garbage

Pruning

9 alts after pruning (9 fresh and 0 done)

	Pruned	Kept	Total
New	90	9	99
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	91	9	100

Accuracy

99.9%

Counts

100 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	51.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
▶	49.4%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	90.3%	(.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)))
	90.3%	#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))
▶	93.7%	#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))
	38.6%	#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))))
▶	38.2%	#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)))
	83.6%	#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 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 340 to 336 computations (1.2% saved)

series38.0ms (0.7%)

Memory

-20.3MiB live, 81.3MiB allocated; 8ms collecting garbage

Counts

36 → 169

Calls

Call 1

Inputs
#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))
(.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)
(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))
(cos.f64 re)
re
(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)
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)
(.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)
(.f64 (.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) im) im)
(.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))) im)
(.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
#s(literal -1/5040 binary64)
(*.f64 im im)
#s(literal -1/120 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(literal 1/2 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))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (- 0 im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 re) #s(literal 1/2 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 (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (+ (* im (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1))))) (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (+ (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))) (* im (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (+ (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)) (* (pow re 2) (+ (* im (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1)))) (* (pow re 2) (+ (* im (* (pow re 2) (+ (* -1/720 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/720 (- (* -1/6 (pow im 2)) 1))))) (* im (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/6 (pow im 2)) 1)))))))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))))) 1)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (+ (* 1/24 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/720 (- (* -1/6 (pow im 2)) 1)))))))))))) 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 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 4) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* (pow im 4) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* (pow im 4) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 3) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* (pow im 3) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* (pow im 3) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 2) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* (pow im 2) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* (pow im 2) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* im (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* im (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (+ (* im (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* im (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (+ (* im (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* im (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (* -1/5040 (pow im 2)) 1/120)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/5040 (pow im 2))) 1/120)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (+ (* -1/5040 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/5040 (pow im 2)) 1/120)) (* 1/24 (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))) 1/120)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (+ (* -1/5040 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/5040 (pow im 2)) 1/120))))))) 1/120)))
#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 (* 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 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #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 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #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/2) #s(hole binary64 1/2))
#s(approx (* (cos re) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* (cos re) 1/2) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))))
#s(approx (* (cos re) 1/2) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))))
#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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (+ (* (cos re) (- (* -1/6 (pow im 2)) 1)) (* (pow im 4) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* (cos re) (- (* -1/6 (pow im 2)) 1)) (* (pow im 4) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120))))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 4) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 3) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 2) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* (cos re) (- (* -1/5040 (pow im 2)) 1/120))))
#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 (* 1/2 (cos re)) #s(hole binary64 (* 1/2 (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* (cos re) 1/2) #s(hole binary64 (* 1/2 (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 (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) 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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* -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 (+ (* (* -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 im #s(hole binary64 im))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 4) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* -1/120 (* (pow im 3) (cos re)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 3) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* -1/120 (* (pow im 2) (cos re)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* -1/120 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* im (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* -1/120 (cos re))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 -1/120))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 (- (* -1/5040 (pow im 2)) 1/120)))
#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 (- (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 (- 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 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1/5040 (* (pow im 7) (cos re)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* (pow im 7) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* (pow im 7) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re)))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* (pow im 7) (+ (* -1 (/ (cos re) (pow im 6))) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* -1/5040 (* (pow im 6) (cos re)))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* (pow im 6) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* (pow im 6) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re)))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* (pow im 6) (+ (* -1 (/ (cos re) (pow im 6))) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (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 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* -1/5040 (* (pow im 6) (cos re)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 6) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* -1/5040 (* (pow im 5) (cos re)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 5) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* -1/5040 (* (pow im 4) (cos re)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 4) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* -1/5040 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* (pow im 3) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* -1/5040 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* (pow im 2) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 (* -1/5040 (pow im 2))))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/5040 (* 1/120 (/ 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 (- 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 (* (* 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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (* 1/120 (/ (cos re) (pow im 2))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (+ (* 1/120 (/ (cos re) (pow im 2))) (* 1/6 (/ (cos re) (pow im 4)))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (+ (* 1/120 (/ (cos re) (pow im 2))) (+ (* 1/6 (/ (cos re) (pow im 4))) (/ (cos re) (pow im 6)))))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/5040 (cos re)) (* 1/120 (/ (cos re) (pow im 2))))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/5040 (cos re)) (* 1/120 (/ (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 (- 0 im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))

Calls

6 calls:

Time	Variable		Point	Expression
7.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (cos re) re (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 im -1 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* (* 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 (* (* 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))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) 1 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) 1/2))
6.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (cos re) re (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 im -1 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* (* 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 (* (* 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))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) 1 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) 1/2))
6.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (cos re) re (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 im -1 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* (* 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 (* (* 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))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) 1 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) 1/2))
5.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (cos re) re (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 im -1 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* (* 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 (* (* 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))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) 1 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) 1/2))
5.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (cos re) re (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 im -1 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* (* 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 (* (* 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))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) 1 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) 1/2))

rewrite797.0ms (14.7%)

Memory

-119.4MiB live, 238.9MiB allocated; 1.1s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	608	5440
0	656	5288
1	3361	5280
0	8047	5132

Stop Event

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

Counts

205 → 347

Calls

Call 1

Inputs
#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))
(.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)
(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))
(cos.f64 re)
re
(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)
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)
(.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)
(.f64 (.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) im) im)
(.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))) im)
(.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
#s(literal -1/5040 binary64)
(*.f64 im im)
#s(literal -1/120 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(literal 1/2 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))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (- 0 im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 re) #s(literal 1/2 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 (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (+ (* im (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1))))) (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (+ (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))) (* im (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1)))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (+ (* im (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)) (* (pow re 2) (+ (* im (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1)))) (* (pow re 2) (+ (* im (* (pow re 2) (+ (* -1/720 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/720 (- (* -1/6 (pow im 2)) 1))))) (* im (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/6 (pow im 2)) 1)))))))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) 1)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/2 (- (* -1/6 (pow im 2)) 1)))))) 1)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/6 (pow im 2)) 1))))))))) 1)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (- (+ (* -1/6 (pow im 2)) (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (+ (* -1/2 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (+ (* 1/24 (- (* -1/6 (pow im 2)) 1)) (* (pow re 2) (+ (* -1/720 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/720 (- (* -1/6 (pow im 2)) 1)))))))))))) 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 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 4) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* (pow im 4) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (+ (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* (pow im 4) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* (pow im 4) (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 3) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* (pow im 3) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* (pow im 3) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* (pow im 3) (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 2) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* (pow im 2) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* (pow im 2) (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* im (- (* -1/5040 (pow im 2)) 1/120))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* im (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (+ (* im (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (* im (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (+ (* im (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))) (* 1/24 (* im (- (* -1/5040 (pow im 2)) 1/120))))))))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (* -1/5040 (pow im 2)) 1/120)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120))) (* -1/5040 (pow im 2))) 1/120)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (+ (* -1/5040 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/5040 (pow im 2)) 1/120)) (* 1/24 (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120)))))) 1/120)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (- (+ (* -1/5040 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/5040 (pow im 2)) 1/120))) (* 1/24 (- (* -1/5040 (pow im 2)) 1/120))))))) 1/120)))
#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 (* 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 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* 1/2 (- (exp (neg im)) (exp im)))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #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 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #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/2) #s(hole binary64 1/2))
#s(approx (* (cos re) 1/2) #s(hole binary64 (+ 1/2 (* -1/4 (pow re 2)))))
#s(approx (* (cos re) 1/2) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))))
#s(approx (* (cos re) 1/2) #s(hole binary64 (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))))
#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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (+ (* (cos re) (- (* -1/6 (pow im 2)) 1)) (* (pow im 4) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* (cos re) (- (* -1/6 (pow im 2)) 1)) (* (pow im 4) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120))))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 4) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 3) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 2) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/5040 (pow im 2)) 1/120)))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* (cos re) (- (* -1/5040 (pow im 2)) 1/120))))
#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 (* 1/2 (cos re)) #s(hole binary64 (* 1/2 (cos re))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))))
#s(approx (* (cos re) 1/2) #s(hole binary64 (* 1/2 (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 (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) 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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (+ (* -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 (+ (* (* -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 im #s(hole binary64 im))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 4) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* -1/120 (* (pow im 3) (cos re)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 3) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* -1/120 (* (pow im 2) (cos re)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* -1/120 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* im (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* -1/120 (cos re))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 -1/120))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 (- (* -1/5040 (pow im 2)) 1/120)))
#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 (- (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 (- 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 (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1/5040 (* (pow im 7) (cos re)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* (pow im 7) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* (pow im 7) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re)))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* (pow im 7) (+ (* -1 (/ (cos re) (pow im 6))) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* -1/5040 (* (pow im 6) (cos re)))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* (pow im 6) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* (pow im 6) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re)))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) #s(hole binary64 (* (pow im 6) (+ (* -1 (/ (cos re) (pow im 6))) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (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 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* -1/5040 (* (pow im 6) (cos re)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) #s(hole binary64 (* (pow im 6) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* -1/5040 (* (pow im 5) (cos re)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* (pow im 5) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* -1/5040 (* (pow im 4) (cos re)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) #s(hole binary64 (* (pow im 4) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* -1/5040 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* (pow im 3) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* -1/5040 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) #s(hole binary64 (* (pow im 2) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 (* -1/5040 (pow im 2))))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/5040 (* 1/120 (/ 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 (- 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 (* (* 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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (* 1/120 (/ (cos re) (pow im 2))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (+ (* 1/120 (/ (cos re) (pow im 2))) (* 1/6 (/ (cos re) (pow im 4)))))))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (+ (* 1/120 (/ (cos re) (pow im 2))) (+ (* 1/6 (/ (cos re) (pow im 4))) (/ (cos re) (pow im 6)))))))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/5040 (cos re)) (* 1/120 (/ (cos re) (pow im 2))))))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/5040 (cos re)) (* 1/120 (/ (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 (- 0 im)) (exp im)) #s(hole binary64 (- (exp (* -1 im)) (exp im))))
#s(approx (exp (- 0 im)) #s(hole binary64 (exp (* -1 im))))
#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) #s(hole binary64 (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))))

Outputs
#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 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im)) 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 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im)) im)
(.f64 im (fma.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))))))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im)))))
(fma.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
(fma.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) (.f64 im im) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
(fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))
(fma.f64 im (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
(fma.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))
(-.f64 (/.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64)) (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))))
(-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (neg.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im)) im))
(+.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)))
(+.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))
(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 (.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 (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 (-.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 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)
im
#s(literal -1 binary64)
(.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im)
(.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) (.f64 im im))
(.f64 im (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im))
(.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im)
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) (*.f64 im im))
(.f64 im (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im))
(.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im)
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im))
(.f64 im (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im))
(fma.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 im im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) (*.f64 im im)))
(fma.f64 (.f64 im im) (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 im im) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64))))
(+.f64 (.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) (.f64 im im)))
(+.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 (.f64 im im) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im)
(.f64 im (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)))
(.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) im))
(fma.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) im (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) im))
(fma.f64 im (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 im (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64))))
(+.f64 (.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) im))
(+.f64 (.f64 im (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64))))
(.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re))
(.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/1728000 binary64) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/1728000 binary64) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64))))))
(fma.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))
(fma.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (cos.f64 re) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1/120 binary64) (cos.f64 re) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))
(fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 im im) (cos.f64 re)) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) #s(literal -1/120 binary64) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))
(-.f64 (/.f64 (pow.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))))
(-.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 #s(literal 1/5040 binary64) (.f64 (.f64 im im) (cos.f64 re))))
(+.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/5040 binary64))) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))
(+.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))
(+.f64 (.f64 #s(literal -1/120 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (.f64 (.f64 im im) #s(literal -1/5040 binary64))) #s(literal 1/14400 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/128024064000 binary64) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)) #s(literal -1/1728000 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (-.f64 #s(literal 1/14400 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (.f64 (.f64 im im) #s(literal -1/5040 binary64))) #s(literal 1/14400 binary64)) (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64)))
(/.f64 (fma.f64 #s(literal -1/128024064000 binary64) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)) #s(literal -1/1728000 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (-.f64 #s(literal 1/14400 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64)))))
(fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64))
(fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) (.f64 (.f64 im im) #s(literal -1/5040 binary64))) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64))) (/.f64 #s(literal 1/14400 binary64) (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64))))
(+.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal -1/120 binary64))
(+.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) #s(literal -1/5040 binary64)))
#s(literal -1/5040 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 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 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/120 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 #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)
(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 (neg.f64 im) (cos.f64 re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(.f64 (.f64 im (cos.f64 re)) #s(literal -1 binary64))
(*.f64 (neg.f64 im) (cos.f64 re))
(.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re)))
(*.f64 im (neg.f64 (cos.f64 re)))
(neg.f64 (*.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)))
(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(.f64 (.f64 (cos.f64 re) #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 (cos.f64 re) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(/.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)
(.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal 1/2 binary64))
(.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 #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))
#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))) (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))))
#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 (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (-.f64 (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)) im))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 im (fma.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re) (-.f64 (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (*.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (fma.f64 (.f64 im (fma.f64 (.f64 #s(literal 1/24 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re) (.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))) (.f64 re re) (.f64 (-.f64 (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (*.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)) im)))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (fma.f64 (-.f64 (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)) im (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) im (.f64 (.f64 im (fma.f64 (.f64 #s(literal -1/720 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re) (.f64 #s(literal 1/24 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))) (.f64 re re))) (*.f64 re re))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (-.f64 (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (*.f64 im im) #s(literal -1/6 binary64))) #s(literal 1 binary64)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (-.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) (fma.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.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/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im))))) #s(literal 1 binary64)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (-.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) (.f64 (.f64 #s(literal 1/24 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (*.f64 im im))))) #s(literal 1 binary64)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (-.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) (.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) (.f64 (.f64 #s(literal -1/720 binary64) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)) (-.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/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im))))) #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 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (fma.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (fma.f64 (fma.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/24 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)))))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (.f64 im im))) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (fma.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/720 binary64) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/24 binary64))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 im im) (.f64 im im)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 (.f64 im im) im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))) (.f64 re re) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (fma.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 (.f64 im im) im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 #s(literal 1/24 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))) (.f64 re re))) (.f64 re re))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 im im)))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (fma.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 im im)) #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 im im))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 im im)) #s(literal 1/24 binary64))) (.f64 re re))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 im im)) #s(literal -1/720 binary64))) (.f64 re re))) (.f64 re re))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) im))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (fma.f64 (.f64 #s(literal -1/2 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) im)))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) im) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) im)))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) im) #s(literal 1/24 binary64))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) im)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (-.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))) (.f64 re re))) #s(literal 1/120 binary64)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 re re)) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))) (.f64 re re) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))) (.f64 re re)) #s(literal 1/120 binary64))))
#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/2) #s(literal 1/2 binary64))
#s(approx (* (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* (cos re) 1/2) (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 (* (cos re) 1/2) (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 (* (* 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))) (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))))
#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 (* (cos re) 1/2) #s(literal 1/2 binary64))
#s(approx (* (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* (cos re) 1/2) (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 (* (cos re) 1/2) (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 (* (* 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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (cos.f64 re))) im))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)) (cos.f64 re))))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 (.f64 im im) (*.f64 im im))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 (.f64 im im) im)))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (*.f64 im im)))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (.f64 (.f64 im (cos.f64 re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 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/2) (*.f64 (cos.f64 re) #s(literal 1/2 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 (* (cos re) 1/2) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
#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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (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 im (fma.f64 (fma.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) 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 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (cos.f64 re) (.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)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 im (fma.f64 (fma.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re)))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (neg.f64 (cos.f64 re)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) 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 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (fma.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (cos.f64 re) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (fma.f64 (fma.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (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 im im)
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/120 binary64)))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (.f64 (.f64 (.f64 im im) im) (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (.f64 (.f64 im (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)))
#s(approx (+ (* -1/5040 (* im im)) -1/120) #s(literal -1/120 binary64))
#s(approx (+ (* -1/5040 (* im im)) -1/120) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))
#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 (.f64 im im) #s(literal -1/120 binary64)) #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 (.f64 im im) #s(literal -1/5040 binary64)) #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 (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)) (*.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 (* (* 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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (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 im (fma.f64 (fma.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (.f64 (pow.f64 im #s(literal 7 binary64)) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (cos.f64 re))) (pow.f64 im #s(literal 7 binary64))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re)))) (pow.f64 im #s(literal 7 binary64))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (cos.f64 re))))) (pow.f64 im #s(literal 7 binary64))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (.f64 (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (*.f64 im im) im)) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re)))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (cos.f64 re))))))
#s(approx (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)) (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal -1/6 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re)))))))
#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 (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (.f64 (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (*.f64 im im) im)) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im) (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (.f64 (pow.f64 im #s(literal 5 binary64)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (cos.f64 re)))))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re))) (.f64 (.f64 im im) (.f64 im im))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/5040 binary64)))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re))) (.f64 (*.f64 im im) im)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/120 binary64) (.f64 #s(literal -1/5040 binary64) (cos.f64 re))) (.f64 im im)))
#s(approx (+ (* -1/5040 (* im im)) -1/120) (.f64 (.f64 im im) #s(literal -1/5040 binary64)))
#s(approx (+ (* -1/5040 (* im im)) -1/120) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/120 binary64) (.f64 im im)) #s(literal 1/5040 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)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.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 (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 #s(literal 1/5040 binary64) (cos.f64 re) (/.f64 (.f64 #s(literal 1/120 binary64) (cos.f64 re)) (*.f64 im im))) (pow.f64 im #s(literal 7 binary64)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 #s(literal 1/5040 binary64) (cos.f64 re) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/6 binary64) (/.f64 (.f64 #s(literal 1/120 binary64) (cos.f64 re)) (.f64 im im)))) (pow.f64 im #s(literal 7 binary64)))))
#s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/5040 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)))))) (pow.f64 im #s(literal 7 binary64)))))
#s(approx (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) (neg.f64 (.f64 (fma.f64 #s(literal 1/5040 binary64) (cos.f64 re) (/.f64 (.f64 #s(literal 1/120 binary64) (cos.f64 re)) (*.f64 im im))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) (neg.f64 (.f64 (fma.f64 #s(literal 1/5040 binary64) (cos.f64 re) (/.f64 (.f64 #s(literal 1/120 binary64) (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)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.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)))

eval67.0ms (1.2%)

Memory: 15.3MiB live, 111.3MiB allocated; 36ms collecting garbage
Compiler: Compiled 5 858 to 2 150 computations (63.3% saved)

prune25.0ms (0.5%)

Memory

5.8MiB live, 54.6MiB allocated; 3ms collecting garbage

Pruning

24 alts after pruning (21 fresh and 3 done)

	Pruned	Kept	Total
New	376	18	394
Fresh	1	3	4
Picked	2	3	5
Done	0	0	0
Total	379	24	403

Accuracy

100.0%

Counts

403 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	51.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
✓	49.4%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	90.3%	(.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)))
	38.3%	(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	38.0%	(.f64 #s(approx ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
▶	90.3%	#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))
	90.3%	#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) #s(approx (+ ( -1/5040 (* im im)) -1/120) #s(literal -1/120 binary64))) im) im) im) im)) im))
	58.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))) im))
	53.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))))) im))
▶	55.3%	#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))
▶	38.6%	#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))))
▶	4.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(literal 1/2 binary64)))
	83.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
	55.5%	#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))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) im))
✓	55.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	41.7%	#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))
	41.6%	#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))
	40.4%	#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))
	54.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))
▶	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	51.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/5040 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)))))) (pow.f64 im #s(literal 7 binary64))))))
	41.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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))))
	40.4%	#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 184 to 1 052 computations (11.1% saved)

series37.0ms (0.7%)

Memory

19.8MiB live, 66.4MiB allocated; 2ms collecting garbage

Counts

39 → 134

Calls

Call 1

Inputs
#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))
(.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)
(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)))
(.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))) im)
(.f64 (cos.f64 re) (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)))
(cos.f64 re)
re
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
#s(literal -1/120 binary64)
(*.f64 im im)
im
#s(literal -1/6 binary64)
(neg.f64 (cos.f64 re))
#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 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 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))
#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)) (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)))
(-.f64 (exp.f64 (neg.f64 im)) (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 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
(.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im)
(-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64))))
(*.f64 (cos.f64 re) (cos.f64 (PI.f64)))
(cos.f64 (PI.f64))
(PI.f64)
(*.f64 (sin.f64 re) (sin.f64 (PI.f64)))
(sin.f64 re)
(sin.f64 (PI.f64))

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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24))) (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))) (* (pow re 2) (+ (* im (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/24)))))) 1)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* im (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* im (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* im (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* -1/120 (pow im 2))) 1/6)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* 1/24 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/6)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (- (* -1/120 (pow im 2)) 1/6))))))) 1/6)))
#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)) #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) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (* im (cos (PI)))))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (+ (* -1 (* im (* re (sin (PI))))) (* im (cos (PI))))))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (+ (* im (cos (PI))) (* re (+ (* -1 (* im (sin (PI)))) (* -1/2 (* im (* re (cos (PI))))))))))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (+ (* im (cos (PI))) (* re (+ (* -1 (* im (sin (PI)))) (* re (+ (* -1/2 (* im (cos (PI)))) (* 1/6 (* im (* re (sin (PI))))))))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (cos (PI))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (+ (cos (PI)) (* -1 (* re (sin (PI)))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (+ (cos (PI)) (* re (- (* -1/2 (* re (cos (PI)))) (sin (PI)))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (+ (cos (PI)) (* re (- (* re (+ (* -1/2 (cos (PI))) (* 1/6 (* re (sin (PI)))))) (sin (PI)))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (cos (PI))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (+ (cos (PI)) (* -1/2 (* (pow re 2) (cos (PI)))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (+ (cos (PI)) (* (pow re 2) (+ (* -1/2 (cos (PI))) (* 1/24 (* (pow re 2) (cos (PI)))))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (+ (cos (PI)) (* (pow re 2) (+ (* -1/2 (cos (PI))) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (cos (PI)))) (* 1/24 (cos (PI))))))))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (sin (PI)))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (+ (sin (PI)) (* -1/6 (* (pow re 2) (sin (PI))))))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (+ (sin (PI)) (* (pow re 2) (+ (* -1/6 (sin (PI))) (* 1/120 (* (pow re 2) (sin (PI))))))))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (+ (sin (PI)) (* (pow re 2) (+ (* -1/6 (sin (PI))) (* (pow re 2) (+ (* -1/5040 (* (pow re 2) (sin (PI)))) (* 1/120 (sin (PI)))))))))))
#s(approx (sin re) #s(hole binary64 re))
#s(approx (sin re) #s(hole binary64 (* re (+ 1 (* -1/6 (pow re 2))))))
#s(approx (sin re) #s(hole binary64 (* re (+ 1 (* (pow re 2) (- (* 1/120 (pow re 2)) 1/6))))))
#s(approx (sin re) #s(hole binary64 (* re (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/120 (* -1/5040 (pow re 2)))) 1/6))))))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* (cos re) (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#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) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (* im (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (* (cos re) (cos (PI)))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* (sin re) (sin (PI)))))
#s(approx (sin re) #s(hole binary64 (sin 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))) (cos re))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* -1/6 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* im (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 -1/6))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#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 (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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* -1/120 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* (pow im 3) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* -1/120 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* (pow im 2) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 (* -1/120 (pow im 2))))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 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 (* (* 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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/120 (cos re)) (* 1/6 (/ (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
9.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (cos re) re (+ (* -1/120 (* im im)) -1/6) -1/120 (* im im) im -1/6 (neg (cos re)) (* (* 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)) (exp im) 1 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 im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) (* (cos re) (cos (PI))) (cos (PI)) (PI) (* (sin re) (sin (PI))) (sin re) (sin (PI)))
6.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (cos re) re (+ (* -1/120 (* im im)) -1/6) -1/120 (* im im) im -1/6 (neg (cos re)) (* (* 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)) (exp im) 1 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 im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) (* (cos re) (cos (PI))) (cos (PI)) (PI) (* (sin re) (sin (PI))) (sin re) (sin (PI)))
6.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (cos re) re (+ (* -1/120 (* im im)) -1/6) -1/120 (* im im) im -1/6 (neg (cos re)) (* (* 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)) (exp im) 1 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 im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) (* (cos re) (cos (PI))) (cos (PI)) (PI) (* (sin re) (sin (PI))) (sin re) (sin (PI)))
5.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (cos re) re (+ (* -1/120 (* im im)) -1/6) -1/120 (* im im) im -1/6 (neg (cos re)) (* (* 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)) (exp im) 1 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 im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) (* (cos re) (cos (PI))) (cos (PI)) (PI) (* (sin re) (sin (PI))) (sin re) (sin (PI)))
5.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (cos re) re (+ (* -1/120 (* im im)) -1/6) -1/120 (* im im) im -1/6 (neg (cos re)) (* (* 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)) (exp im) 1 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 im) (+ (* (* re re) -1/4) 1/2) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) (* (cos re) (cos (PI))) (cos (PI)) (PI) (* (sin re) (sin (PI))) (sin re) (sin (PI)))

rewrite204.0ms (3.8%)

Memory

-4.8MiB live, 272.3MiB allocated; 64ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	582	3778
0	629	3473
1	3465	3473
0	8200	3376

Stop Event

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

Counts

173 → 463

Calls

Call 1

Inputs
#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))
(.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)
(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)))
(.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))) im)
(.f64 (cos.f64 re) (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)))
(cos.f64 re)
re
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
#s(literal -1/120 binary64)
(*.f64 im im)
im
#s(literal -1/6 binary64)
(neg.f64 (cos.f64 re))
#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 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 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))
#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)) (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)))
(-.f64 (exp.f64 (neg.f64 im)) (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 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
(.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im)
(-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64))))
(*.f64 (cos.f64 re) (cos.f64 (PI.f64)))
(cos.f64 (PI.f64))
(PI.f64)
(*.f64 (sin.f64 re) (sin.f64 (PI.f64)))
(sin.f64 re)
(sin.f64 (PI.f64))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24))) (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))) (* (pow re 2) (+ (* im (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/24)))))) 1)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* im (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* im (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* im (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* -1/120 (pow im 2))) 1/6)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* 1/24 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/6)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (- (* -1/120 (pow im 2)) 1/6))))))) 1/6)))
#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)) #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) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (* im (cos (PI)))))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (+ (* -1 (* im (* re (sin (PI))))) (* im (cos (PI))))))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (+ (* im (cos (PI))) (* re (+ (* -1 (* im (sin (PI)))) (* -1/2 (* im (* re (cos (PI))))))))))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (+ (* im (cos (PI))) (* re (+ (* -1 (* im (sin (PI)))) (* re (+ (* -1/2 (* im (cos (PI)))) (* 1/6 (* im (* re (sin (PI))))))))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (cos (PI))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (+ (cos (PI)) (* -1 (* re (sin (PI)))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (+ (cos (PI)) (* re (- (* -1/2 (* re (cos (PI)))) (sin (PI)))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (+ (cos (PI)) (* re (- (* re (+ (* -1/2 (cos (PI))) (* 1/6 (* re (sin (PI)))))) (sin (PI)))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (cos (PI))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (+ (cos (PI)) (* -1/2 (* (pow re 2) (cos (PI)))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (+ (cos (PI)) (* (pow re 2) (+ (* -1/2 (cos (PI))) (* 1/24 (* (pow re 2) (cos (PI)))))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (+ (cos (PI)) (* (pow re 2) (+ (* -1/2 (cos (PI))) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (cos (PI)))) (* 1/24 (cos (PI))))))))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (sin (PI)))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (+ (sin (PI)) (* -1/6 (* (pow re 2) (sin (PI))))))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (+ (sin (PI)) (* (pow re 2) (+ (* -1/6 (sin (PI))) (* 1/120 (* (pow re 2) (sin (PI))))))))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* re (+ (sin (PI)) (* (pow re 2) (+ (* -1/6 (sin (PI))) (* (pow re 2) (+ (* -1/5040 (* (pow re 2) (sin (PI)))) (* 1/120 (sin (PI)))))))))))
#s(approx (sin re) #s(hole binary64 re))
#s(approx (sin re) #s(hole binary64 (* re (+ 1 (* -1/6 (pow re 2))))))
#s(approx (sin re) #s(hole binary64 (* re (+ 1 (* (pow re 2) (- (* 1/120 (pow re 2)) 1/6))))))
#s(approx (sin re) #s(hole binary64 (* re (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/120 (* -1/5040 (pow re 2)))) 1/6))))))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* (cos re) (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (cos re) #s(hole binary64 (cos re)))
#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) (cos (PI))) (* (sin re) (sin (PI)))) im) #s(hole binary64 (* im (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))))))
#s(approx (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) #s(hole binary64 (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI))))))
#s(approx (* (cos re) (cos (PI))) #s(hole binary64 (* (cos re) (cos (PI)))))
#s(approx (* (sin re) (sin (PI))) #s(hole binary64 (* (sin re) (sin (PI)))))
#s(approx (sin re) #s(hole binary64 (sin 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))) (cos re))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* -1/6 (* im (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* im (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 -1/6))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#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 (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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* -1/120 (* (pow im 3) (cos re)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* (pow im 3) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* -1/120 (* (pow im 2) (cos re)))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) #s(hole binary64 (* (pow im 2) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 (* -1/120 (pow im 2))))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 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 (* (* 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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/120 (cos re)) (* 1/6 (/ (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 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im (neg.f64 (cos.f64 re))) im))
(.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im (neg.f64 (cos.f64 re))) im)
(.f64 im (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im (neg.f64 (cos.f64 re))))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 im (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)))
(fma.f64 im (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im))
(fma.f64 im (neg.f64 (cos.f64 re)) (.f64 im (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)))
(+.f64 (.f64 (neg.f64 (cos.f64 re)) im) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im))
(+.f64 (.f64 (neg.f64 (cos.f64 re)) im) (.f64 im (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))))) (neg.f64 (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (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) re)))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #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) re)))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)))))
(fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))
(fma.f64 (.f64 im im) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) (neg.f64 (cos.f64 re)))
(fma.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im (neg.f64 (cos.f64 re)))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) (*.f64 im im) (neg.f64 (cos.f64 re)))
(fma.f64 im (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) (neg.f64 (cos.f64 re)))
(fma.f64 (cos.f64 re) #s(literal -1 binary64) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))))
(-.f64 (neg.f64 (cos.f64 re)) (.f64 (neg.f64 (.f64 im im)) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))))
(+.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))
(+.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im)
(.f64 im (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)))
(.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) im))
(fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) im))
(fma.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) im))
(+.f64 (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))
(.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #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 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #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 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))))
(fma.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (cos.f64 re) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
(fma.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (cos.f64 re)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/120 binary64)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
(-.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 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))))
(-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 im im) (cos.f64 re))))
(+.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(+.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(+.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 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 (fma.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) #s(literal -1/1728000 binary64) #s(literal -1/216 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64)) (-.f64 #s(literal 1/36 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64))) #s(literal 1/36 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64))) #s(literal 1/36 binary64)) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64)))
(/.f64 (fma.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) #s(literal -1/1728000 binary64) #s(literal -1/216 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64)) (-.f64 #s(literal 1/36 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64)))))
(fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))
(fma.f64 (*.f64 im im) #s(literal -1/120 binary64) #s(literal -1/6 binary64))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (/.f64 #s(literal 1/36 binary64) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))))
(+.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))
(+.f64 #s(literal -1/6 binary64) (.f64 (.f64 im im) #s(literal -1/120 binary64)))
#s(literal -1/120 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/6 binary64)
(*.f64 #s(literal -1 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (-.f64 (PI.f64) re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64)))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 (PI.f64) re)) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) (.f64 (cos.f64 (-.f64 (PI.f64) re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 re))) (sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) re)) (sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) re))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64)))) (sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64))) (neg.f64 (cos.f64 re))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (PI.f64)) (neg.f64 re))) (cos.f64 (-.f64 (neg.f64 (PI.f64)) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (PI.f64)) re)) (cos.f64 (-.f64 (neg.f64 (PI.f64)) re))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (PI.f64) (neg.f64 re))) (cos.f64 (-.f64 (PI.f64) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 re) (neg.f64 (PI.f64)))) (cos.f64 (-.f64 (neg.f64 re) (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (neg.f64 re) (PI.f64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 re (neg.f64 (PI.f64)))) (cos.f64 (-.f64 re (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (PI.f64) re)))
(/.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))))
(/.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) #s(literal 2 binary64))
(neg.f64 (cos.f64 re))
(sin.f64 (neg.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 re (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(fma.f64 #s(literal -1 binary64) (cos.f64 re) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 re) #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (cos.f64 (-.f64 (PI.f64) re))) (/.f64 (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (cos.f64 (-.f64 (PI.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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64)))))) (/.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (*.f64 (sin.f64 re) #s(literal 0 binary64)))))))
(-.f64 (neg.f64 (cos.f64 re)) (*.f64 (sin.f64 re) #s(literal 0 binary64)))
(cos.f64 (neg.f64 (+.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 (PI.f64) re))
(cos.f64 (+.f64 (neg.f64 re) (PI.f64)))
(cos.f64 (+.f64 re (PI.f64)))
(+.f64 (neg.f64 (cos.f64 re)) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 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 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.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 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))
#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)) (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 (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 #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 (-.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/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 (-.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 (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))
(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 (.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 (cos.f64 re)) im))
(*.f64 (neg.f64 (cos.f64 re)) im)
(*.f64 im (neg.f64 (cos.f64 re)))
(*.f64 #s(literal -1 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (-.f64 (PI.f64) re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64)))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 (PI.f64) re)) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) (.f64 (cos.f64 (-.f64 (PI.f64) re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 re))) (sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) re)) (sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) re))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64)))) (sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64))) (neg.f64 (cos.f64 re))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (PI.f64)) (neg.f64 re))) (cos.f64 (-.f64 (neg.f64 (PI.f64)) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (PI.f64)) re)) (cos.f64 (-.f64 (neg.f64 (PI.f64)) re))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (PI.f64) (neg.f64 re))) (cos.f64 (-.f64 (PI.f64) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 re) (neg.f64 (PI.f64)))) (cos.f64 (-.f64 (neg.f64 re) (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (neg.f64 re) (PI.f64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 re (neg.f64 (PI.f64)))) (cos.f64 (-.f64 re (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (PI.f64) re)))
(/.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))))
(/.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) #s(literal 2 binary64))
(neg.f64 (cos.f64 re))
(sin.f64 (neg.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 re (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(fma.f64 #s(literal -1 binary64) (cos.f64 re) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 re) #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (cos.f64 (-.f64 (PI.f64) re))) (/.f64 (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (cos.f64 (-.f64 (PI.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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64)))))) (/.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (*.f64 (sin.f64 re) #s(literal 0 binary64)))))))
(-.f64 (neg.f64 (cos.f64 re)) (*.f64 (sin.f64 re) #s(literal 0 binary64)))
(cos.f64 (neg.f64 (+.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 (PI.f64) re))
(cos.f64 (+.f64 (neg.f64 re) (PI.f64)))
(cos.f64 (+.f64 re (PI.f64)))
(+.f64 (neg.f64 (cos.f64 re)) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(*.f64 #s(literal -1 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (-.f64 (PI.f64) re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64)))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re)))) #s(literal -2 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 (cos.f64 (-.f64 (PI.f64) re)) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) (.f64 (cos.f64 (-.f64 (PI.f64) re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 3 binary64))) #s(literal 2 binary64)) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 re))) (sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) re)) (sin.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) re))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64)))) (sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64))) (neg.f64 (cos.f64 re))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (PI.f64)) (neg.f64 re))) (cos.f64 (-.f64 (neg.f64 (PI.f64)) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (PI.f64)) re)) (cos.f64 (-.f64 (neg.f64 (PI.f64)) re))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (PI.f64) (neg.f64 re))) (cos.f64 (-.f64 (PI.f64) (neg.f64 re)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 re) (neg.f64 (PI.f64)))) (cos.f64 (-.f64 (neg.f64 re) (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (neg.f64 re) (PI.f64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 re (neg.f64 (PI.f64)))) (cos.f64 (-.f64 re (neg.f64 (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64))) (cos.f64 (-.f64 (PI.f64) re)))
(/.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64))))))
(/.f64 (+.f64 (neg.f64 (cos.f64 re)) (cos.f64 (-.f64 (PI.f64) re))) #s(literal 2 binary64))
(neg.f64 (cos.f64 re))
(sin.f64 (neg.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (+.f64 re (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 re (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(fma.f64 #s(literal -1 binary64) (cos.f64 re) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 re) #s(literal -1 binary64) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (cos.f64 (-.f64 (PI.f64) re))) (/.f64 (pow.f64 (*.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (cos.f64 (-.f64 (PI.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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (.f64 (sin.f64 re) #s(literal 0 binary64)))))) (/.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 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) re)))) (+.f64 (pow.f64 (.f64 (sin.f64 re) #s(literal 0 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 (cos.f64 re)) (*.f64 (sin.f64 re) #s(literal 0 binary64)))))))
(-.f64 (neg.f64 (cos.f64 re)) (*.f64 (sin.f64 re) #s(literal 0 binary64)))
(cos.f64 (neg.f64 (+.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 (PI.f64) re))
(cos.f64 (+.f64 (neg.f64 re) (PI.f64)))
(cos.f64 (+.f64 re (PI.f64)))
(+.f64 (neg.f64 (cos.f64 re)) (*.f64 (neg.f64 (sin.f64 re)) #s(literal 0 binary64)))
#s(literal -1 binary64)
(PI.f64)
(*.f64 #s(literal 0 binary64) (sin.f64 re))
(*.f64 (sin.f64 re) #s(literal 0 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (PI.f64) re)) (neg.f64 (cos.f64 re))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (PI.f64) re)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 re)) #s(literal 2 binary64)))
(sin.f64 re)
#s(literal 0 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 #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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 im (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 re re) (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (fma.f64 (.f64 im (fma.f64 (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)) (.f64 re re) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)))) (.f64 re re) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (fma.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)) im (.f64 (fma.f64 (.f64 im (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/720 binary64)) (.f64 re re) (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)))) (.f64 re re) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) im)) (*.f64 re re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im))) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (fma.f64 (+.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)) (.f64 re re) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) #s(literal 1/2 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im))) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im) (-.f64 (.f64 (+.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/720 binary64)) (.f64 re re))) #s(literal 1/24 binary64)) (.f64 re re))) (*.f64 re re)) #s(literal 1 binary64))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (fma.f64 (.f64 #s(literal -1/2 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im) #s(literal 1/24 binary64))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (-.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re))) #s(literal 1/6 binary64)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re)) #s(literal 1/6 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 (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) (cos (PI))) (* (sin re) (sin (PI)))) im) (neg.f64 im))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (neg.f64 im) (*.f64 #s(literal 0 binary64) re) (neg.f64 im)))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im)))
#s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 #s(literal 0 binary64) re) im) #s(literal 1/6 binary64) (.f64 #s(literal -1/2 binary64) (neg.f64 im))) re (.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im)))
#s(approx (neg (cos re)) #s(literal -1 binary64))
#s(approx (neg (cos re)) (+.f64 (neg.f64 (*.f64 #s(literal 0 binary64) re)) #s(literal -1 binary64)))
#s(approx (neg (cos re)) (fma.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) re) #s(literal -1/2 binary64)) #s(literal 0 binary64)) re #s(literal -1 binary64)))
#s(approx (neg (cos re)) (fma.f64 (-.f64 (.f64 (fma.f64 (.f64 #s(literal 0 binary64) re) #s(literal 1/6 binary64) #s(literal 1/2 binary64)) re) #s(literal 0 binary64)) re #s(literal -1 binary64)))
#s(approx (neg (cos re)) #s(literal -1 binary64))
#s(approx (neg (cos re)) (fma.f64 (.f64 #s(literal -1 binary64) (.f64 re re)) #s(literal -1/2 binary64) #s(literal -1 binary64)))
#s(approx (neg (cos re)) (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (.f64 re re)) #s(literal 1/24 binary64) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64)))
#s(approx (neg (cos re)) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1 binary64) (.f64 re re)) #s(literal -1/720 binary64) #s(literal -1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64)))
#s(approx (* (sin re) (sin (PI))) (*.f64 #s(literal 0 binary64) re))
#s(approx (* (sin re) (sin (PI))) (.f64 (fma.f64 (.f64 #s(literal 0 binary64) (*.f64 re re)) #s(literal -1/6 binary64) #s(literal 0 binary64)) re))
#s(approx (* (sin re) (sin (PI))) (.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (.f64 #s(literal 0 binary64) (.f64 re re)) #s(literal 0 binary64)) (.f64 re re) #s(literal 0 binary64)) re))
#s(approx (* (sin re) (sin (PI))) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 #s(literal 0 binary64) (.f64 re re)) #s(literal 0 binary64)) (.f64 re re) #s(literal 0 binary64)) (*.f64 re re) #s(literal 0 binary64)) re))
#s(approx (sin re) re)
#s(approx (sin re) (.f64 (fma.f64 (.f64 re re) #s(literal -1/6 binary64) #s(literal 1 binary64)) re))
#s(approx (sin re) (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/120 binary64) (.f64 re re)) #s(literal 1/6 binary64)) (.f64 re re) #s(literal 1 binary64)) re))
#s(approx (sin re) (.f64 (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 re re) #s(literal 1/120 binary64)) (.f64 re re)) #s(literal 1/6 binary64)) (*.f64 re re) #s(literal 1 binary64)) 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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (.f64 im im)) (cos.f64 re)) im))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (*.f64 im im)) (cos.f64 re)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (.f64 (.f64 im (cos.f64 re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)))
#s(approx (cos re) (cos.f64 re))
#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) (cos (PI))) (* (sin re) (sin (PI)))) im) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (neg (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (neg (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (* (sin re) (sin (PI))) (*.f64 (sin.f64 re) #s(literal 0 binary64)))
#s(approx (sin re) (sin.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 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) 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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im (neg.f64 (cos.f64 re))) im))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (neg.f64 (cos.f64 re)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (cos.f64 re)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (.f64 (.f64 im (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)))
#s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64))
#s(approx (+ (* -1/120 (* im im)) -1/6) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 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 (.f64 im im) #s(literal -1/120 binary64)) #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 #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 (* (- (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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (pow.f64 im #s(literal 5 binary64))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (.f64 (.f64 im im) (*.f64 im im))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/120 binary64)))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (.f64 (.f64 (.f64 im im) im) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 im im)))
#s(approx (+ (* -1/120 (* im im)) -1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64)))
#s(approx (+ (* -1/120 (* im im)) -1/6) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/6 binary64) (.f64 im im)) #s(literal 1/120 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 (* (* 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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (.f64 #s(literal 1/120 binary64) (cos.f64 re))) (.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))))

eval55.0ms (1%)

Memory: -9.1MiB live, 81.4MiB allocated; 18ms collecting garbage
Compiler: Compiled 5 847 to 2 200 computations (62.4% saved)

prune29.0ms (0.5%)

Memory

3.2MiB live, 49.6MiB allocated; 3ms collecting garbage

Pruning

31 alts after pruning (26 fresh and 5 done)

	Pruned	Kept	Total
New	395	14	409
Fresh	4	12	16
Picked	3	2	5
Done	0	3	3
Total	402	31	433

Accuracy

100.0%

Counts

433 → 31

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	51.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
✓	49.4%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	90.3%	(.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)))
	38.3%	(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	38.0%	(.f64 #s(approx ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
▶	90.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im)))
	60.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))) im))
	54.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))))) im))
	55.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) #s(literal -1 binary64)) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
▶	13.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
✓	4.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(literal 1/2 binary64)))
▶	9.1%	#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) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	5.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (neg.f64 im))) #s(approx (exp im) #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(literal 1 binary64))) #s(literal 1/2 binary64)))
	83.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
	55.5%	#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))
✓	55.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
▶	90.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
	83.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (cos.f64 re))) im))
	39.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))
	41.7%	#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))
	41.6%	#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))
	40.4%	#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))
	40.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
	56.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #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)))
	54.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))
✓	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	49.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64))))))
	51.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/5040 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)))))) (pow.f64 im #s(literal 7 binary64))))))
	41.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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))))
	40.4%	#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 571 to 1 429 computations (9% saved)

series39.0ms (0.7%)

Memory

-3.3MiB live, 45.3MiB allocated; 23ms collecting garbage

Counts

42 → 166

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
(.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im)
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re)))
(-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im)
(.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))
(fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))
(*.f64 #s(literal -1/120 binary64) im)
#s(literal -1/120 binary64)
im
#s(literal -1/6 binary64)
(cos.f64 re)
re
#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(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#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 #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) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(.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) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(-.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) #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)))
(fma.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))
(-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.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)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
(exp.f64 im)
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
(.f64 (.f64 re re) #s(literal -1/4 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im)))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im))
(neg.f64 (cos.f64 re))
(.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24))) (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))) (* (pow re 2) (+ (* im (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/24)))))) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/24)))))) 1)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 2) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* (pow im 2) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* (pow im 2) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* im (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* im (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* im (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* -1/120 (pow im 2))) 1/6)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* 1/24 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/6)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (- (* -1/120 (pow im 2)) 1/6))))))) 1/6)))
#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) -1/4) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* 1/2 im)))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/24 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (+ (* 1/24 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* 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 (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 3) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* (pow im 3) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* (pow im 3) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))))))))))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* (cos re) (- (* -1/120 (pow im 2)) 1/6))))
#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) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 (* im (cos re))) (* (pow im 3) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 3) (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))) (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))) (cos re))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* -1/6 (* im (cos re)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* im (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 -1/6))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#s(approx (* -1/120 im) #s(hole binary64 (* -1/120 im)))
#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 (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (- (* im 1/2) 1) #s(hole binary64 -1))
#s(approx (- (* im 1/2) 1) #s(hole binary64 (- (* 1/2 im) 1)))
#s(approx (* im 1/2) #s(hole binary64 (* 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 (neg im) #s(hole binary64 (* -1 im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) 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/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 3) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* -1/120 (* (pow im 3) (cos re)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* (pow im 3) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* -1/120 (* (pow im 2) (cos re)))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* (pow im 2) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 (* -1/120 (pow im 2))))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 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 (+ (* (- (* 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 (pow im 2))) (/ 1 im)))))
#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 (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/120 (cos re)) (* 1/6 (/ (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 (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 (* (pow im 2) (+ 1/2 (* -1 (/ (- 1 (/ 1 im)) im))))))
#s(approx (- (* im 1/2) 1) #s(hole binary64 (* -1 (* im (- (/ 1 im) 1/2)))))
#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 (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))

Calls

6 calls:

Time	Variable		Point	Expression
19.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 im -1/6 (cos re) re (* (* 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)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (- (* im 1/2) 1) im) 1) (- (* im 1/2) 1) (* 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)) (neg im) (exp im) (+ (* (* re re) -1/4) 1/2) (* (* re re) -1/4) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (neg (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im))
4.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 im -1/6 (cos re) re (* (* 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)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (- (* im 1/2) 1) im) 1) (- (* im 1/2) 1) (* 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)) (neg im) (exp im) (+ (* (* re re) -1/4) 1/2) (* (* re re) -1/4) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (neg (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im))
4.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 im -1/6 (cos re) re (* (* 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)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (- (* im 1/2) 1) im) 1) (- (* im 1/2) 1) (* 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)) (neg im) (exp im) (+ (* (* re re) -1/4) 1/2) (* (* re re) -1/4) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (neg (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im))
3.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 im -1/6 (cos re) re (* (* 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)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (- (* im 1/2) 1) im) 1) (- (* im 1/2) 1) (* 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)) (neg im) (exp im) (+ (* (* re re) -1/4) 1/2) (* (* re re) -1/4) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (neg (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im))
3.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 im -1/6 (cos re) re (* (* 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)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (- (* im 1/2) 1) im) 1) (- (* im 1/2) 1) (* 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)) (neg im) (exp im) (+ (* (* re re) -1/4) 1/2) (* (* re re) -1/4) (* re re) -1/4 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (neg (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im))

rewrite224.0ms (4.1%)

Memory

19.9MiB live, 251.4MiB allocated; 90ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	615	5511
0	658	5350
1	3468	5344
0	8397	5151

Stop Event

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

Counts

208 → 366

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
(.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im)
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re)))
(-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im)
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im)
(.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))
(fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))
(*.f64 #s(literal -1/120 binary64) im)
#s(literal -1/120 binary64)
im
#s(literal -1/6 binary64)
(cos.f64 re)
re
#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(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#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 #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) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(.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) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(-.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) #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)))
(fma.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))
(-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.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)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
(exp.f64 im)
#s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
(.f64 (.f64 re re) #s(literal -1/4 binary64))
(*.f64 re re)
#s(literal -1/4 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im)))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im))
(neg.f64 (cos.f64 re))
(.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24))) (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* im (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))) (* (pow re 2) (+ (* im (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) (* im (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))) 1)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/24)))))) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1/24)))))) 1)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ 1/720 (* -1/720 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/24)))))) 1)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 2) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* (pow im 2) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (+ (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* (pow im 2) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* im (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (+ (* -1/2 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* im (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (+ (* im (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* im (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* im (- (* -1/120 (pow im 2)) 1/6))))))))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (+ (* -1/2 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* -1/120 (pow im 2))) 1/6)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* 1/24 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))) 1/6)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (- (+ (* -1/120 (pow im 2)) (* (pow re 2) (+ (* -1/2 (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (- (* -1/120 (pow im 2)) 1/6))))))) 1/6)))
#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) -1/4) #s(hole binary64 (* -1/4 (pow re 2))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* 1/2 im)))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/24 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))))))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 im) (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (+ (* 1/24 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* 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 (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (+ (* -1/2 (* (pow im 3) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* 1/24 (* (pow im 3) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))))))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (+ (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6)) (* (pow re 2) (+ (* -1/2 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))) (* (pow re 2) (+ (* -1/720 (* (pow im 3) (* (pow re 2) (- (* -1/120 (pow im 2)) 1/6)))) (* 1/24 (* (pow im 3) (- (* -1/120 (pow im 2)) 1/6))))))))))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))) (cos re))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 2) (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* im (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* (cos re) (- (* -1/120 (pow im 2)) 1/6))))
#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) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (+ (* -1 (* im (cos re))) (* (pow im 3) (* (cos re) (- (* -1/120 (pow im 2)) 1/6))))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 3) (* (cos re) (- (* -1/120 (pow im 2)) 1/6)))))
#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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))) (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))) (cos re))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* -1/6 (* (pow im 2) (cos re)))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* -1/6 (* im (cos re)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* im (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 -1/6))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 (- (* -1/120 (pow im 2)) 1/6)))
#s(approx (* -1/120 im) #s(hole binary64 (* -1/120 im)))
#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 (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 1))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 (* -1 im))))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 (+ 1 (* im (- (* 1/2 im) 1)))))
#s(approx (- (* im 1/2) 1) #s(hole binary64 -1))
#s(approx (- (* im 1/2) 1) #s(hole binary64 (- (* 1/2 im) 1)))
#s(approx (* im 1/2) #s(hole binary64 (* 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 (neg im) #s(hole binary64 (* -1 im)))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) 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/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* -1/6 (* (pow im 3) (cos re)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 3) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) #s(hole binary64 (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* -1/120 (* (pow im 4) (cos re)))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* -1/120 (* (pow im 3) (cos re)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* (pow im 3) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* -1/120 (* (pow im 2) (cos re)))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) #s(hole binary64 (* (pow im 2) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 (* -1/120 (pow im 2))))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(hole binary64 (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 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 (+ (* (- (* 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 (pow im 2))) (/ 1 im)))))
#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 (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* -1/120 (* (pow im 5) (cos re)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) #s(hole binary64 (* -1 (* (pow im 3) (+ (* 1/120 (cos re)) (* 1/6 (/ (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 (+ (* (- (* im 1/2) 1) im) 1) #s(hole binary64 (* (pow im 2) (+ 1/2 (* -1 (/ (- 1 (/ 1 im)) im))))))
#s(approx (- (* im 1/2) 1) #s(hole binary64 (* -1 (* im (- (/ 1 im) 1/2)))))
#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 (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))
#s(approx (+ (* (neg (cos re)) im) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) #s(hole binary64 (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re))) im))
(.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re))) im)
(.f64 im #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))))) (neg.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im (cos.f64 re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) (cos.f64 re))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im (cos.f64 re)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) (cos.f64 re)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (cos.f64 re))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (cos.f64 re))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re))))) (/.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re))))))
(-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re))
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im)
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) (.f64 im im))
(.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)))
(.f64 im (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))))
(fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) (*.f64 im im)))
(fma.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 im im) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) (.f64 im im)))
(+.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 (.f64 im im) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im)
(.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re)))
(.f64 im (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)))
(.f64 (cos.f64 re) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) im))
(fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im (.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) im))
(fma.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) im) (.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) im))
(+.f64 (.f64 im (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))
(.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #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 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #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 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64))))))
(fma.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (cos.f64 re) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
(fma.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (cos.f64 re)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/120 binary64)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
(-.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 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))))
(-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 im im) (cos.f64 re))))
(+.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(+.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(+.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64))) #s(literal 1/36 binary64))) (neg.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) #s(literal -1/1728000 binary64) #s(literal -1/216 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64)) (-.f64 #s(literal 1/36 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64))) #s(literal 1/36 binary64)) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64)))
(/.f64 (fma.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) #s(literal -1/1728000 binary64) #s(literal -1/216 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64)) (-.f64 #s(literal 1/36 binary64) (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64)))))
(fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))
(fma.f64 (*.f64 im im) #s(literal -1/120 binary64) #s(literal -1/6 binary64))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(fma.f64 im (*.f64 #s(literal -1/120 binary64) im) #s(literal -1/6 binary64))
(-.f64 (/.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (/.f64 #s(literal 1/36 binary64) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))))
(+.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))
(+.f64 #s(literal -1/6 binary64) (.f64 (.f64 im im) #s(literal -1/120 binary64)))
(*.f64 #s(literal -1/120 binary64) im)
(*.f64 im #s(literal -1/120 binary64))
#s(literal -1/120 binary64)
im
#s(literal -1/6 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 (* (* 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(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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) #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) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (neg.f64 (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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))) (.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 (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) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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))) (.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 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp (neg im)) #s(literal 1 binary64)) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (*.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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) #s(literal 1 binary64)))) (/.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (+.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #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))) (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) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))))))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#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 #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) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(.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) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (-.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) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.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 (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64)))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))))) (neg.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) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.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(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 (fma.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 (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.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) #s(literal 1 binary64)))))))
(/.f64 (-.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 (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64)))) (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))) (+.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) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.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(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 #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 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.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) #s(literal 1 binary64))))))
(-.f64 (/.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 (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64)))) (+.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) #s(literal 1 binary64)))) (/.f64 (.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (+.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) #s(literal 1 binary64)))))
(-.f64 (/.f64 (pow.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(literal 3 binary64)) (fma.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 (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.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) #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))) (fma.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 (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) (fma.f64 #s(approx (exp im) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)) (.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) #s(literal 1 binary64)))))))
(-.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) #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)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)) #s(literal 1 binary64))) (neg.f64 (-.f64 (.f64 (-.f64 (*.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 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)))) (neg.f64 (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.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 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (*.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 (-.f64 (.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 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)) #s(literal 1 binary64)) (-.f64 (.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (*.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 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)))))
(fma.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))
(fma.f64 im (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(-.f64 (/.f64 (.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)) (-.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 (*.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 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))) (/.f64 (.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)) (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 im) (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(+.f64 (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im))
(/.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 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 (.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 (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 im #s(literal 1/2 binary64))) #s(literal 1 binary64)) (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)))
(/.f64 (-.f64 (.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 (.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 im #s(literal 1/2 binary64))) (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64))))
(-.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 im #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 im #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) im)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))))
(.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 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 #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)))
(*.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)
(exp.f64 im)
(+.f64 (cosh.f64 im) (sinh.f64 im))
#s(approx (+ (* (* re re) -1/4) 1/2) (.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 re re))
(.f64 re (.f64 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 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (neg.f64 (cos.f64 re))) im))
(.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (neg.f64 (cos.f64 re))) im)
(.f64 im (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (neg.f64 (cos.f64 re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) 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 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im))))))
(/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) 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 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im)))))
(fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im))
(fma.f64 (.f64 im (cos.f64 re)) #s(literal -1 binary64) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im))
(fma.f64 (neg.f64 im) (cos.f64 re) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im))
(fma.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im))
(fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im (*.f64 (neg.f64 im) (cos.f64 re)))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) (.f64 im im) (*.f64 (neg.f64 im) (cos.f64 re)))
(fma.f64 im (neg.f64 (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im))
(fma.f64 im (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (*.f64 (neg.f64 im) (cos.f64 re)))
(-.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 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 2 binary64)) (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im))))
(-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im)) im))
(+.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im))
(+.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) 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)))
(.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im)
(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) (*.f64 im im))
(.f64 im (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 im (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 re re) (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (fma.f64 (.f64 im (fma.f64 (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)) (.f64 re re) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)))) (.f64 re re) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im)) #s(literal 1 binary64)) im)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (fma.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)) im (.f64 (fma.f64 (.f64 im (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/720 binary64)) (.f64 re re) (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)))) (.f64 re re) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) im)) (*.f64 re re))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im))) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (fma.f64 (+.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)) (.f64 re re) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) #s(literal 1/2 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im))) #s(literal 1 binary64)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im) (-.f64 (.f64 (+.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/720 binary64)) (.f64 re re))) #s(literal 1/24 binary64)) (.f64 re re))) (*.f64 re re)) #s(literal 1 binary64))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (*.f64 im im))) #s(literal 1 binary64)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (-.f64 (fma.f64 (+.f64 (fma.f64 (-.f64 (.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))) #s(literal 1/24 binary64)) (.f64 re re) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) #s(literal 1/2 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im))) #s(literal 1 binary64)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im) (-.f64 (.f64 (+.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/2 binary64)) (.f64 (-.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) #s(literal 1/720 binary64)) (.f64 re re))) #s(literal 1/24 binary64)) (.f64 re re))) (*.f64 re re)) #s(literal 1 binary64))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (fma.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 im im)) #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 im im)) #s(literal 1/24 binary64))) (.f64 re re))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 im im)) #s(literal -1/720 binary64))) (.f64 re re))) (.f64 re re))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (fma.f64 (.f64 #s(literal -1/2 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im)))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im) #s(literal -1/2 binary64))) (.f64 re re) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im)))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (.f64 #s(literal -1/720 binary64) im) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)))) (.f64 re re))) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re) (.f64 (.f64 im im) #s(literal -1/120 binary64))) #s(literal 1/6 binary64)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 #s(literal 1/24 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re)) #s(literal 1/6 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) -1/4) (.f64 (.f64 re re) #s(literal -1/4 binary64)))
#s(approx (* re re) (*.f64 re re))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (fma.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (neg.f64 im)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 re re) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (neg.f64 im)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 #s(literal -1/24 binary64) im)) (.f64 re re) (.f64 im #s(literal 1/2 binary64)))) (.f64 re re) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (neg.f64 im)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (+.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) im (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 #s(literal 1/720 binary64) im)) (.f64 re re)))) (.f64 re re) (.f64 im #s(literal 1/2 binary64)))) (.f64 re re) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #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 (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 (.f64 im im) im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))) (.f64 re re) (.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (fma.f64 (.f64 (.f64 im im) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 (.f64 im im) im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 (.f64 #s(literal -1/720 binary64) (.f64 (.f64 im im) im)) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 re re)))) (.f64 re re))) (.f64 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (.f64 im im)) (cos.f64 re)) im))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (*.f64 im im)) (cos.f64 re)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (*.f64 im im)) (cos.f64 re)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (*.f64 im im)))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (.f64 (.f64 im (cos.f64 re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)))
#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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (.f64 (.f64 im im) im) (.f64 (neg.f64 im) (cos.f64 re))))
#s(approx (neg (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (cos.f64 re)) (.f64 (.f64 im 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 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) 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/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (neg.f64 (cos.f64 re))) im))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (neg.f64 (cos.f64 re)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (cos.f64 re)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (-.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (cos.f64 re)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) (cos.f64 re)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (.f64 (.f64 im (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)))
#s(approx (+ (* (* -1/120 im) im) -1/6) #s(literal -1/6 binary64))
#s(approx (+ (* (* -1/120 im) im) -1/6) (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)))
#s(approx (* -1/120 im) (*.f64 #s(literal -1/120 binary64) 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 (.f64 im im) #s(literal -1/120 binary64)) #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 (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 (+ (* (- (* im 1/2) 1) im) 1) #s(literal 1 binary64))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) (+.f64 (neg.f64 im) #s(literal 1 binary64)))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) (fma.f64 (-.f64 (*.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) (-.f64 (*.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)))
#s(approx (* im 1/2) (*.f64 im #s(literal 1/2 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 im) (neg.f64 im))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im (neg.f64 (cos.f64 re))) im))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/6 binary64)))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (.f64 (.f64 (.f64 im im) im) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (pow.f64 im #s(literal 5 binary64))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))))
#s(approx (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (.f64 (.f64 im im) (*.f64 im im))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))))
#s(approx (- (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (cos re)) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (.f64 (.f64 im im) (*.f64 im im))))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (.f64 (.f64 (cos.f64 re) (.f64 (.f64 im im) im)) #s(literal -1/120 binary64)))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 (*.f64 im im) im)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re))) (.f64 im im)))
#s(approx (+ (* (* -1/120 im) im) -1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64)))
#s(approx (+ (* (* -1/120 im) im) -1/6) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/6 binary64) (.f64 im im)) #s(literal 1/120 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 (+ (* (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im im)))
#s(approx (+ (* (- (* im 1/2) 1) im) 1) (.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)) (*.f64 im im)))
#s(approx (- (* im 1/2) 1) (*.f64 im #s(literal 1/2 binary64)))
#s(approx (- (* im 1/2) 1) (*.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) 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)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (+.f64 (/.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 im im) (.f64 im im))) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (pow.f64 im #s(literal 5 binary64))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (cos.f64 re)) #s(literal -1/120 binary64)))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (.f64 #s(literal 1/120 binary64) (cos.f64 re))) (.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 (+ (* (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))
#s(approx (- (* im 1/2) 1) (*.f64 (neg.f64 im) (-.f64 (/.f64 #s(literal 1 binary64) 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 (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64)))))
#s(approx (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (neg.f64 (.f64 (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (*.f64 #s(literal 1/120 binary64) (cos.f64 re))) (pow.f64 im #s(literal 5 binary64)))))

eval50.0ms (0.9%)

Memory: -1.7MiB live, 87.6MiB allocated; 11ms collecting garbage
Compiler: Compiled 7 074 to 2 356 computations (66.7% saved)

prune46.0ms (0.9%)

Memory

28.1MiB live, 79.1MiB allocated; 18ms collecting garbage

Pruning

35 alts after pruning (26 fresh and 9 done)

	Pruned	Kept	Total
New	428	9	437
Fresh	4	17	21
Picked	1	4	5
Done	0	5	5
Total	433	35	468

Accuracy

100.0%

Counts

468 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	51.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
✓	49.4%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	90.3%	(.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)))
	38.3%	(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	38.0%	(.f64 #s(approx ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
✓	90.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im)))
	55.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) #s(literal -1 binary64)) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
✓	13.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))))
✓	4.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(literal 1/2 binary64)))
	8.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	8.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im im)))) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	7.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	8.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	20.9%	#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.1%	#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)))
✓	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(literal 1 binary64))) #s(literal 1/2 binary64)))
	83.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
	55.5%	#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))
✓	55.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	54.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) (cos.f64 re)))))) im))
	60.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im (cos.f64 re)))) im))
✓	90.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
	83.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 #s(approx (+ ( (* -1/120 im) im) -1/6) #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
	39.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))
	41.7%	#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))
	41.6%	#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))
	40.4%	#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))
	40.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
	56.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #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)))
	54.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))
✓	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	49.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64))))))
	51.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/5040 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)))))) (pow.f64 im #s(literal 7 binary64))))))
	41.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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))))
	40.4%	#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 759 to 1 302 computations (26% saved)

regimes98.0ms (1.8%)

Memory

-29.1MiB live, 107.6MiB allocated; 13ms collecting garbage

Counts

51 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) 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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
(.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 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(.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))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 #s(approx (+ ( (* -1/120 im) im) -1/6) #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) 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))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) 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) #s(approx (+ ( -1/5040 (* im im)) -1/120) #s(literal -1/120 binary64))) im) im) im) im)) 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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) #s(literal -1 binary64)) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) 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))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64))))))
#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 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im (cos.f64 re)))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (cos re) (+ (* (* -1/6 im) im) -1)) (* (* (* (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) im) im) im) im)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/5040 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 (.f64 im im) (.f64 im im))) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im)))))) (pow.f64 im #s(literal 7 binary64))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) (cos.f64 re)))))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 3 binary64)) (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re)))) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im) im) im))))) im))

Outputs

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes18.0ms (0.3%)

Memory

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

Counts

35 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) 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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
(.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 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(.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))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (.f64 #s(approx (+ ( (* -1/120 im) im) -1/6) #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (cos.f64 re))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (-.f64 (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) (cos.f64 re))) 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 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))

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 (exp.f64 (neg.f64 im)) (exp.f64 im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))

Calls

2 calls:

9.0ms	im
7.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))`
99.9%	2	`im`

Compiler

Compiled 7 to 9 computations (-28.6% saved)

regimes20.0ms (0.4%)

Memory

-16.4MiB live, 33.0MiB allocated; 8ms collecting garbage

Counts

31 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) 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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
(.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

(*.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 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))

Calls

2 calls:

12.0ms	im
6.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))

Results

Accuracy	Segments	Branch
99.7%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
99.7%	2	`im`

Compiler

Compiled 7 to 9 computations (-28.6% saved)

regimes38.0ms (0.7%)

Memory

-18.5MiB live, 27.6MiB allocated; 3ms collecting garbage

Counts

30 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) 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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))

Outputs

#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 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))

Calls

2 calls:

28.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
8.0ms	im

Results

Accuracy	Segments	Branch
99.6%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
99.6%	2	`im`

Compiler

Compiled 7 to 9 computations (-28.6% saved)

regimes21.0ms (0.4%)

Memory

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

Counts

29 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) 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 (.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) (.f64 (.f64 #s(literal -1/120 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re))) im))

Outputs

(*.f64 #s(approx (* (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 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))

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

Calls

3 calls:

8.0ms	im
6.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
6.0ms	(-.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)))`
90.3%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
97.9%	3	`im`

Compiler

Compiled 18 to 20 computations (-11.1% saved)

regimes8.0ms (0.2%)

Memory

-29.7MiB live, 16.0MiB allocated; 4ms collecting garbage

Counts

26 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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 (neg.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) im))

Outputs

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

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

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

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.0%	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)

regimes37.0ms (0.7%)

Memory

31.2MiB live, 77.5MiB allocated; 1ms collecting garbage

Counts

24 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))
(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) (+.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)) im)) #s(literal 1/2 binary64))))) #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)) (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))) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (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))) #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 (* (* 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

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

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

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

Calls

6 calls:

7.0ms	re
6.0ms	im
6.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
6.0ms	(cos.f64 re)
5.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
68.4%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
68.8%	3	`(cos.f64 re)`
68.8%	3	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
58.9%	2	`re`
68.4%	2	`im`
78.6%	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)

regimes9.0ms (0.2%)

Memory

-36.1MiB live, 11.4MiB allocated; 9ms collecting garbage

Counts

16 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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 (* (* 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 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (.f64 im im) #s(literal 1/2 binary64)))) #s(approx (exp im) #s(literal 1 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))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 #s(approx (- ( im 1/2) 1) (*.f64 im #s(literal 1/2 binary64))) im #s(literal 1 binary64))) #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 #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 ( (cos re) 1/2) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
#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) #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(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(approx (+ ( (- (* im 1/2) 1) im) 1) (.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 im 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 #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))) #s(approx (* (- (* (cos re) (cos (PI))) (* (sin re) (sin (PI)))) im) (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -1 binary64) re) im) #s(literal -1/2 binary64) (*.f64 (neg.f64 im) #s(literal 0 binary64))) re (neg.f64 im))))

Outputs

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

#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 #s(approx (neg (cos re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))

Calls

1 calls:

3.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
76.0%	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)

regimes15.0ms (0.3%)

Memory

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

Counts

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

5 calls:

3.0ms	im
3.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
3.0ms	(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)))
2.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))

Results

Accuracy	Segments	Branch
63.4%	2	`(cos.f64 re)`
63.4%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
54.9%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
54.9%	1	`im`
63.4%	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)

regimes11.0ms (0.2%)

Memory

-22.0MiB live, 23.6MiB allocated; 6ms collecting garbage

Counts

5 → 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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (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))) #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)))

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))

Calls

4 calls:

5.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
2.0ms	re
2.0ms	(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
54.9%	1	`re`
54.9%	1	`(cos.f64 re)`
54.9%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
54.9%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 18 to 21 computations (-16.7% saved)

regimes10.0ms (0.2%)

Memory

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

Accuracy

Total -20.1b remaining (-47.9%)

Threshold costs -20.1b (-47.9%)

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(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 (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (neg.f64 im))) #s(approx (exp im) #s(literal 1 binary64))) #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	im
2.0ms	re
2.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 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
34.6%	1	`(cos.f64 re)`
34.6%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
34.6%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
34.6%	1	`im`
34.6%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
34.6%	1	`re`

Compiler

Compiled 25 to 30 computations (-20% saved)

bsearch21.0ms (0.4%)

Memory

-9.7MiB live, 35.8MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	0.0009659992593512058	13.638760693821846

Samples

11.0ms

128×

valid

Compiler

Compiled 383 to 376 computations (1.8% saved)

Precisions

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

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

ival-exp: 2.0ms (26.6% of total)

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

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

adjust: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.0009659992593512058	13.638760693821846

Compiler

Compiled 271 to 288 computations (-6.3% saved)

bsearch42.0ms (0.8%)

Memory

-20.5MiB live, 25.7MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
41.0ms	0.0009659992593512058	13.638760693821846

Samples

9.0ms

112×

valid

Compiler

Compiled 295 to 312 computations (-5.8% saved)

Precisions

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

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

ival-exp: 2.0ms (31.7% of total)

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

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

bsearch9.0ms (0.2%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
8.0ms	0.0009659992593512058	13.638760693821846

Samples

5.0ms

64×

valid

Compiler

Compiled 271 to 288 computations (-6.3% saved)

Precisions

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

ival-cos: 2.0ms (55.2% of total)

ival-exp: 1.0ms (27.6% of total)

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

ival-sub!: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	292423.4448540213	+inf
0.0ms	-inf	-3.6303687695885643e-8

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	292423.4448540213	+inf
0.0ms	-inf	-3.6303687695885643e-8

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.9612062595433566e-13
0.0ms	-3.6303687695885643e-8	-1.3987690450356638e-9

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.9612062595433566e-13
0.0ms	-3.6303687695885643e-8	-1.3987690450356638e-9

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.9612062595433566e-13

Compiler

Compiled 14 to 16 computations (-14.3% saved)

derivations441.0ms (8.1%)

Memory

-13.3MiB live, 371.6MiB allocated; 128ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 183 to 121 computations (33.9% saved)

preprocess249.0ms (4.6%)

Memory

24.9MiB live, 353.3MiB allocated; 67ms collecting garbage

Remove

(negabs im)

(abs re)

Compiler

Compiled 2 754 to 2 372 computations (13.9% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample2.5s (45.5%)

preprocess79.0ms (1.5%)

series9.0ms (0.2%)

rewrite178.0ms (3.3%)

eval10.0ms (0.2%)

prune9.0ms (0.2%)

series38.0ms (0.7%)

rewrite797.0ms (14.7%)

eval67.0ms (1.2%)

prune25.0ms (0.5%)

series37.0ms (0.7%)

rewrite204.0ms (3.8%)

eval55.0ms (1%)

prune29.0ms (0.5%)

series39.0ms (0.7%)

rewrite224.0ms (4.1%)

eval50.0ms (0.9%)

prune46.0ms (0.9%)

regimes98.0ms (1.8%)

regimes18.0ms (0.3%)

regimes20.0ms (0.4%)

regimes38.0ms (0.7%)

regimes21.0ms (0.4%)

regimes8.0ms (0.2%)

regimes37.0ms (0.7%)

regimes9.0ms (0.2%)

regimes15.0ms (0.3%)

regimes11.0ms (0.2%)

regimes10.0ms (0.2%)

bsearch21.0ms (0.4%)

bsearch2.0ms (0%)

bsearch42.0ms (0.8%)

bsearch9.0ms (0.2%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations441.0ms (8.1%)

preprocess249.0ms (4.6%)

end0.0ms (0%)

Profiling