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

1.1MiB live, 1.1MiB 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.6s (43.8%)

Memory

82.6MiB live, 2 471.0MiB allocated; 583ms collecting garbage

Samples

1.1s	1 711×	2	valid
566.0ms	2 338×	1	valid
515.0ms	4 206×	0	valid
2.0ms	1×	3	valid

Precisions

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

ival-exp: 971.0ms (49.5% of total)

ival-mult!: 470.0ms (24% of total)

ival-cos: 293.0ms (15% of total)

adjust: 118.0ms (6% of total)

ival-sub!: 107.0ms (5.5% of total)

Bogosity

preprocess43.0ms (0.7%)

Memory

-22.0MiB live, 21.7MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	30	70
1	96	66
2	292	58
3	1525	38

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	56.8%	(.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.1%)

Memory

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

rewrite189.0ms (3.2%)

Memory

-25.5MiB live, 275.3MiB allocated; 69ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	188	735
0	199	699
1	1023	669
0	8509	637

Stop Event

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

Counts

51 → 111

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 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) #s(literal 1 binary64))))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (*.f64 (cos.f64 re) #s(literal 1/2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3 binary64))) (exp.f64 (.f64 im #s(literal 3 binary64)))) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) (+.f64 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) #s(literal 1 binary64))))
(neg.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re))))
(neg.f64 (.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (cos.f64 re)) #s(literal -1/2 binary64)))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 re)))
(neg.f64 (*.f64 (cos.f64 re) #s(literal -1/2 binary64)))
#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 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (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 (exp.f64 (*.f64 (neg.f64 im) #s(literal 2 binary64))) (+.f64 (exp.f64 (+.f64 im im)) #s(literal 1 binary64))))
(-.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)) #s(literal 1 binary64)))) (/.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)) #s(literal 1 binary64)))))
(-.f64 (exp.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))))
(*.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))
(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 (neg.f64 im)) (sinh.f64 (neg.f64 im)))) (-.f64 (cosh.f64 im) (sinh.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 (cosh.f64 im) (cosh.f64 im)) (.f64 (sinh.f64 im) (sinh.f64 im))) (exp.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 (-.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 #s(literal -1 binary64) (neg.f64 (exp.f64 im)))
(/.f64 #s(literal 1 binary64) (exp.f64 im))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 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 (neg.f64 im) (*.f64 im im))) (fma.f64 im im #s(literal 0 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 im)) #s(literal 2 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 (neg.f64 im) (.f64 im im))) (.f64 #s(literal 2 binary64) (fma.f64 im im #s(literal 0 binary64))))
(/.f64 (neg.f64 (.f64 (neg.f64 im) (.f64 im im))) (neg.f64 (fma.f64 im im #s(literal 0 binary64))))
(/.f64 (*.f64 (neg.f64 im) im) im)
(/.f64 (.f64 (neg.f64 im) (.f64 im 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 (fma.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))) (.f64 re re) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #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)) #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 im) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
#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 im (fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re)))))
#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: 20.3MiB live, 20.3MiB allocated; 0ms collecting garbage
Compiler: Compiled 944 to 458 computations (51.5% saved)

prune8.0ms (0.1%)

Memory

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

Pruning

10 alts after pruning (10 fresh and 0 done)

	Pruned	Kept	Total
New	90	10	100
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	91	10	101

Accuracy

99.9%

Counts

101 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.9%	(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (*.f64 (cos.f64 re) #s(literal 1/2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
▶	56.8%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
▶	55.6%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	91.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #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)))
	89.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
	40.2%	#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))))
▶	45.6%	#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)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
▶	49.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
▶	91.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im (fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re)))))

Compiler

Compiled 380 to 370 computations (2.6% saved)

series30.0ms (0.5%)

Memory

10.5MiB live, 55.3MiB allocated; 8ms collecting garbage

Counts

31 → 142

Calls

Call 1

Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im (fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re)))))
(.f64 im (fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (neg.f64 (cos.f64 re))))
im
(fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (neg.f64 (cos.f64 re)))
(fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)))
(cos.f64 re)
re
(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)
(*.f64 #s(literal -1/6 binary64) (cos.f64 re))
#s(literal -1/6 binary64)
(neg.f64 (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)))
(*.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 im) (cos.f64 re)))
(*.f64 (neg.f64 im) (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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (+ (* im (* (pow re 2) (+ 1/2 (* (pow im 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))))) (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (* (pow re 2) (+ (* im (* (pow re 2) (- (* (pow im 2) (- (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) 1/144)) 1/24))) (* im (+ 1/2 (* (pow im 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))))))))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (+ (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (* (pow re 2) (+ (* im (+ 1/2 (* (pow im 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))))) (* (pow re 2) (+ (* im (* (pow re 2) (+ 1/720 (* (pow im 2) (+ 1/4320 (* -1/720 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))))) (* im (- (* (pow im 2) (- (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) 1/144)) 1/24)))))))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) (* (pow re 2) (+ 1/2 (* (pow im 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))))) 1)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* (pow im 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))) (* (pow re 2) (- (* (pow im 2) (- (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) 1/144)) 1/24)))))) 1)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) (* (pow re 2) (+ 1/2 (+ (* (pow im 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))))) (* (pow re 2) (- (+ (* (pow im 2) (- (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) 1/144)) (* (pow re 2) (+ 1/720 (* (pow im 2) (+ 1/4320 (* -1/720 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))))) 1/24)))))) 1)))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ 1/12 (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))) 1/6)))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ 1/12 (+ (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (- (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) 1/144)))))) 1/6)))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (- (+ (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) (* (pow re 2) (+ 1/12 (+ (* -1/2 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (- (+ (* 1/24 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120))) (* (pow re 2) (+ 1/4320 (* -1/720 (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)))))) 1/144)))))) 1/6)))
#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 (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/6 (cos re)) #s(hole binary64 -1/6))
#s(approx (* -1/6 (cos re)) #s(hole binary64 (- (* 1/12 (pow re 2)) 1/6)))
#s(approx (* -1/6 (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* -1/144 (pow re 2)))) 1/6)))
#s(approx (* -1/6 (cos re)) #s(hole binary64 (- (* (pow re 2) (+ 1/12 (* (pow re 2) (- (* 1/4320 (pow re 2)) 1/144)))) 1/6)))
#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 (* (neg im) (cos re)) #s(hole binary64 (* -1 im)))
#s(approx (* (neg im) (cos re)) #s(hole binary64 (+ (* -1 im) (* 1/2 (* im (pow re 2))))))
#s(approx (* (neg im) (cos re)) #s(hole binary64 (+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))))
#s(approx (* (neg im) (cos re)) #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 (* 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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* im (- (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120))))) (cos re)))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (* (cos re) (- (* -1/5040 (pow im 2)) 1/120))))) (cos re))))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (+ (* -1/6 (cos re)) (* (pow im 2) (* (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 (cos re) #s(hole binary64 (cos re)))
#s(approx (* -1/6 (cos re)) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (neg (cos re)) #s(hole binary64 (* -1 (cos re))))
#s(approx (* (neg im) (cos re)) #s(hole binary64 (* -1 (* im (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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* -1 (* im (cos re)))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #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 im #s(hole binary64 im))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (* -1 (cos re))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (* -1/6 (* (pow im 2) (cos re))) (cos re))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* 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/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (- (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))) (cos re))))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (* -1/6 (cos re))))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* -1/5040 (* (pow im 7) (cos re)))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* (pow im 7) (+ (* -1/120 (/ (cos re) (pow im 2))) (* -1/5040 (cos re))))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #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/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #s(hole binary64 (* -1/5040 (* (pow im 6) (cos re)))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #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)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #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/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) #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 (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #s(hole binary64 (* -1/5040 (* (pow im 4) (cos re)))))
#s(approx (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) #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 im)) (* -1/6 (cos re))) #s(hole binary64 (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 4))) (+ (* -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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #s(hole binary64 (* -1 (* (pow im 7) (+ (* 1/5040 (cos re)) (* 1/120 (/ (cos re) (pow im 2))))))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) #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 (* (- (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
8.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (cos re) re (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* -1/6 (cos re)) -1/6 (neg (cos 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)) (neg im) (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (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	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (cos re) re (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* -1/6 (cos re)) -1/6 (neg (cos 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)) (neg im) (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (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))
3.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (cos re) re (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* -1/6 (cos re)) -1/6 (neg (cos 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)) (neg im) (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (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))
3.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (cos re) re (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* -1/6 (cos re)) -1/6 (neg (cos 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)) (neg im) (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (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))
3.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (cos re) re (+ (* -1/5040 (* im im)) -1/120) -1/5040 (* im im) -1/120 (* -1/6 (cos re)) -1/6 (neg (cos 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)) (neg im) (exp im) 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (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))

rewrite264.0ms (4.5%)

Memory

-30.1MiB live, 338.4MiB allocated; 59ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	522	4346
0	570	4242
1	2962	4242
0	10411	4122

Stop Event

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

Counts

173 → 330

Calls

Call 1

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

eval47.0ms (0.8%)

Memory: 28.4MiB live, 117.8MiB allocated; 15ms collecting garbage
Compiler: Compiled 6 194 to 1 777 computations (71.3% saved)

prune39.0ms (0.7%)

Memory

3.6MiB live, 66.0MiB allocated; 25ms collecting garbage

Pruning

22 alts after pruning (19 fresh and 3 done)

	Pruned	Kept	Total
New	353	15	368
Fresh	1	4	5
Picked	2	3	5
Done	0	0	0
Total	356	22	378

Accuracy

100.0%

Counts

378 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.9%	(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (*.f64 (cos.f64 re) #s(literal 1/2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
✓	56.8%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	3.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (/.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))))
✓	55.6%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
	91.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #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)))
▶	89.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
	40.0%	(.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)))
	45.4%	(.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)))
	23.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.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)))) (cos.f64 re)))
▶	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	45.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64))) (exp.f64 im)) #s(literal 1/2 binary64)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	32.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓	49.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
	38.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #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)))))
	36.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))))
	91.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im (fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64)))))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im (/.f64 (-.f64 (pow.f64 (.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)) #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 (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))))))
▶	91.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.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)) (cos.f64 re)))))
	57.6%	#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)))
▶	32.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
▶	38.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) (fma.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) (.f64 re re) (neg.f64 im))))

Compiler

Compiled 986 to 900 computations (8.7% saved)

series64.0ms (1.1%)

Memory

-7.1MiB live, 84.8MiB allocated; 11ms collecting garbage

Counts

50 → 195

Calls

Call 1

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

Calls

6 calls:

Time	Variable		Point	Expression
33.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (+ (* (* -1/5040 im) im) -1/120) (* -1/5040 im) -1/5040 -1/120 (cos re) re (* -1/6 (cos re)) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) 1 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (* (* re re) im) 1/720 (* -1/24 im) -1/24 (* im 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 1/3 2)
6.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (+ (* (* -1/5040 im) im) -1/120) (* -1/5040 im) -1/5040 -1/120 (cos re) re (* -1/6 (cos re)) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) 1 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (* (* re re) im) 1/720 (* -1/24 im) -1/24 (* im 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 1/3 2)
6.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (+ (* (* -1/5040 im) im) -1/120) (* -1/5040 im) -1/5040 -1/120 (cos re) re (* -1/6 (cos re)) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) 1 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (* (* re re) im) 1/720 (* -1/24 im) -1/24 (* im 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 1/3 2)
5.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (+ (* (* -1/5040 im) im) -1/120) (* -1/5040 im) -1/5040 -1/120 (cos re) re (* -1/6 (cos re)) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) 1 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (* (* re re) im) 1/720 (* -1/24 im) -1/24 (* im 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 1/3 2)
4.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (+ (* (* -1/5040 im) im) -1/120) (* -1/5040 im) -1/5040 -1/120 (cos re) re (* -1/6 (cos re)) -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (exp im) 1 1/2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (* (* re re) im) 1/720 (* -1/24 im) -1/24 (* im 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (* (* (- (* -1/60 (* im im)) 1/3) im) im) (* (- (* -1/60 (* im im)) 1/3) im) (- (* -1/60 (* im im)) 1/3) (* -1/60 (* im im)) -1/60 1/3 2)

rewrite239.0ms (4.1%)

Memory

9.5MiB live, 320.4MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	682	6975
0	745	6768
1	3714	6768
0	8208	6576

Stop Event

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

Counts

245 → 428

Calls

Call 1

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

Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re))) im))
(.f64 #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re))) im)
(.f64 im #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re))))
im
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 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 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (cos.f64 re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 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 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im)) (cos.f64 re))))))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 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))))) (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (cos.f64 re)))
(/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 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 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im)) (cos.f64 re)))))
(-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re))
(.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) im) im)
(.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im))
(.f64 (.f64 im im) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(fma.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (.f64 im im) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im)))))
(fma.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im) (.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (.f64 im im)))
(+.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 (.f64 im im) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im)))))
(+.f64 (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 im im)) (.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (*.f64 im im)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64))) (-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im)))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)) (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)) (.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) #s(literal -1/216 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))))
(fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) im) im (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (.f64 (.f64 im im) (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)))
(fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(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)))
(fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))))
(fma.f64 im (.f64 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)))
(fma.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im)) (.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(fma.f64 (cos.f64 re) #s(literal -1/6 binary64) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))))
(-.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (*.f64 #s(literal 1/6 binary64) (cos.f64 re)))
(-.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (neg.f64 (.f64 im im)) (.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re))))
(+.f64 (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (.f64 im im))) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
(+.f64 (.f64 #s(literal -1/6 binary64) (cos.f64 re)) (.f64 (cos.f64 re) (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im))))
(*.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.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))))
(.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 #s(literal -1/1728000 binary64) (pow.f64 (cos.f64 re) #s(literal 3 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 #s(literal -1/1728000 binary64) (pow.f64 (cos.f64 re) #s(literal 3 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 #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))
(fma.f64 im (*.f64 #s(literal -1/5040 binary64) im) #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)))
(*.f64 #s(literal -1/5040 binary64) im)
(*.f64 im #s(literal -1/5040 binary64))
#s(literal -1/5040 binary64)
#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 #s(literal -1/6 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal -1/6 binary64))
#s(literal -1/6 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
(*.f64 #s(literal -1 binary64) im)
(*.f64 im #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (+.f64 #s(literal 0 binary64) im)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im))) (neg.f64 (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im im) im)) (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im))))
(neg.f64 im)
(-.f64 #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 (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))) #s(approx (* (neg im) (cos re)) (fma.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re (neg.f64 im))))
#s(approx (* (neg im) (cos re)) (fma.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re (neg.f64 im)))
(/.f64 (neg.f64 (-.f64 (.f64 im im) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)))) (neg.f64 (-.f64 (neg.f64 im) (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)) (.f64 im im))) (neg.f64 (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) (neg.f64 im))))
(/.f64 (neg.f64 (fma.f64 (.f64 im im) (neg.f64 im) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 3 binary64)))) (neg.f64 (fma.f64 im im (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)) (.f64 (neg.f64 im) (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 3 binary64)) (.f64 (.f64 im im) (neg.f64 im)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)) (-.f64 (.f64 im im) (.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) (neg.f64 im))))))
(/.f64 (-.f64 (.f64 im im) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64))) (-.f64 (neg.f64 im) (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)) (.f64 im im)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) (neg.f64 im)))
(/.f64 (fma.f64 (.f64 im im) (neg.f64 im) (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 3 binary64))) (fma.f64 im im (-.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)) (.f64 (neg.f64 im) (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re)))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 3 binary64)) (.f64 (.f64 im im) (neg.f64 im))) (+.f64 (pow.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re) #s(literal 2 binary64)) (-.f64 (.f64 im im) (.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) (neg.f64 im)))))
(fma.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re (neg.f64 im))
(fma.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) (.f64 re re) (neg.f64 im))
(fma.f64 #s(literal -1 binary64) im (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re))
(fma.f64 (.f64 re re) (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) (neg.f64 im))
(fma.f64 im #s(literal -1 binary64) (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re))
(-.f64 (neg.f64 im) (.f64 (neg.f64 (.f64 re re)) (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64)))))
(+.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) (neg.f64 im))
(+.f64 (neg.f64 im) (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)) (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (.f64 im #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im) (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)) (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (*.f64 #s(literal -1/24 binary64) im))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 3 binary64)) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (*.f64 im #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64))) (-.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)) (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)))) (-.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (.f64 im #s(literal 1/2 binary64))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im) (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 3 binary64))) (fma.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)) (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (*.f64 #s(literal -1/24 binary64) im)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 3 binary64)) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) im))) (+.f64 (pow.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 im #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (*.f64 im #s(literal 1/2 binary64))))))
(fma.f64 (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 re re) (*.f64 im #s(literal 1/2 binary64)))
(fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64)))
(fma.f64 im #s(literal 1/2 binary64) (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (*.f64 #s(literal -1/24 binary64) im))))
(fma.f64 re (.f64 re (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (*.f64 im #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) im (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (*.f64 #s(literal -1/24 binary64) im))))
(-.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (.f64 (neg.f64 im) #s(literal 1/2 binary64)))
(-.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 (neg.f64 (.f64 re re)) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))))
(+.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))) (.f64 im #s(literal 1/2 binary64)))
(+.f64 (.f64 im #s(literal 1/2 binary64)) (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im))))
(*.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.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))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64))) (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im)))) (neg.f64 (-.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 #s(literal -1/24 binary64) im))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im)) (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64))))) (neg.f64 (-.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (.f64 (.f64 re re) im) #s(literal 3 binary64)) #s(literal 1/373248000 binary64) (.f64 #s(literal -1/13824 binary64) (.f64 (.f64 im im) im)))) (neg.f64 (fma.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im)) (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (*.f64 #s(literal -1/24 binary64) im))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/13824 binary64) (.f64 (.f64 im im) im) (.f64 (pow.f64 (.f64 (.f64 re re) im) #s(literal 3 binary64)) #s(literal 1/373248000 binary64)))) (neg.f64 (fma.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im) (-.f64 (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64))) (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 (.f64 (*.f64 re re) im) #s(literal 1/720 binary64)))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64))) (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im))) (-.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 #s(literal -1/24 binary64) im)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im)) (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)))) (-.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64))))
(/.f64 (fma.f64 (pow.f64 (.f64 (.f64 re re) im) #s(literal 3 binary64)) #s(literal 1/373248000 binary64) (.f64 #s(literal -1/13824 binary64) (.f64 (.f64 im im) im))) (fma.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (-.f64 (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im)) (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (*.f64 #s(literal -1/24 binary64) im)))))
(/.f64 (fma.f64 #s(literal -1/13824 binary64) (.f64 (.f64 im im) im) (.f64 (pow.f64 (.f64 (.f64 re re) im) #s(literal 3 binary64)) #s(literal 1/373248000 binary64))) (fma.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/24 binary64) im) (-.f64 (.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64))) (.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 (.f64 (*.f64 re re) im) #s(literal 1/720 binary64))))))
(fma.f64 (.f64 #s(literal 1/720 binary64) im) (.f64 re re) (*.f64 #s(literal -1/24 binary64) im))
(fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (*.f64 #s(literal -1/24 binary64) im))
(fma.f64 (.f64 re re) (.f64 #s(literal 1/720 binary64) im) (*.f64 #s(literal -1/24 binary64) im))
(fma.f64 #s(literal -1/24 binary64) im (.f64 (.f64 (*.f64 re re) im) #s(literal 1/720 binary64)))
(fma.f64 #s(literal 1/720 binary64) (.f64 (.f64 re re) im) (*.f64 #s(literal -1/24 binary64) im))
(fma.f64 im #s(literal -1/24 binary64) (.f64 (.f64 (*.f64 re re) im) #s(literal 1/720 binary64)))
(-.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 #s(literal 1/24 binary64) im))
(-.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 #s(literal -1/720 binary64) (.f64 (.f64 re re) im)))
(+.f64 (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)) (.f64 #s(literal -1/24 binary64) im))
(+.f64 (.f64 #s(literal -1/24 binary64) im) (.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64)))
(.f64 (.f64 re re) im)
(.f64 im (.f64 re re))
(.f64 re (.f64 re im))
#s(literal 1/720 binary64)
(*.f64 #s(literal -1/24 binary64) im)
(*.f64 im #s(literal -1/24 binary64))
#s(literal -1/24 binary64)
(*.f64 im #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) im)
(.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
(.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) #s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
(.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)
(.f64 im (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) #s(literal 4 binary64))) (neg.f64 (fma.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 3 binary64)) #s(literal 8 binary64))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) #s(literal 4 binary64)) (fma.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64))
(.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im)
(.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) (.f64 im im))
(.f64 (.f64 im im) (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))
(.f64 im (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im))
(.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im)
(.f64 im (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64))) #s(literal 1/9 binary64))) (neg.f64 (fma.f64 (.f64 im im) #s(literal -1/60 binary64) #s(literal 1/3 binary64))))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal -1/216000 binary64) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im))) #s(literal 1/27 binary64))) (neg.f64 (fma.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64))) #s(literal 1/9 binary64)) (fma.f64 (.f64 im im) #s(literal -1/60 binary64) #s(literal 1/3 binary64)))
(/.f64 (-.f64 (.f64 #s(literal -1/216000 binary64) (.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) im))) #s(literal 1/27 binary64)) (fma.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) (.f64 (.f64 im im) #s(literal -1/60 binary64)) (+.f64 #s(literal 1/9 binary64) (.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))))
(-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64))
(.f64 (.f64 #s(literal -1/60 binary64) im) im)
(.f64 (.f64 im im) #s(literal -1/60 binary64))
(.f64 #s(literal -1/60 binary64) (.f64 im im))
#s(literal -1/60 binary64)
#s(literal 1/3 binary64)
#s(literal 2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.f64 im (fma.f64 (fma.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)) #s(literal 1/12 binary64)) (.f64 im im) #s(literal 1/2 binary64)) (.f64 re re) (-.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)))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (fma.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 (.f64 (.f64 im (fma.f64 (-.f64 (.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 im im)) #s(literal 1/24 binary64)) (.f64 re re) (fma.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)) #s(literal 1/12 binary64)) (.f64 im im) #s(literal 1/2 binary64)))) (.f64 re re))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (fma.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 (.f64 (fma.f64 (.f64 im (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/4320 binary64)) (.f64 im im) #s(literal 1/720 binary64)) (.f64 re re) (-.f64 (.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 im im)) #s(literal 1/24 binary64)))) (.f64 re re) (.f64 (fma.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)) #s(literal 1/12 binary64)) (.f64 im im) #s(literal 1/2 binary64)) im)) (*.f64 re re))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.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)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (fma.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) (-.f64 (.f64 (fma.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)) #s(literal 1/12 binary64)) (.f64 im im) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (fma.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) (.f64 (+.f64 (fma.f64 (-.f64 (.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 im im)) #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/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/12 binary64)) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 re re))) #s(literal 1 binary64)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 im im) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/4320 binary64)) (.f64 im im) #s(literal 1/720 binary64)) (.f64 re re)) #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/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/12 binary64)) (.f64 im im))) #s(literal 1/2 binary64)) (.f64 re re) (.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)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (-.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)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (fma.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) (-.f64 (.f64 (fma.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)) #s(literal 1/12 binary64)) (.f64 im im) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (-.f64 (fma.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) (.f64 (+.f64 (fma.f64 (-.f64 (.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 im im)) #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/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/12 binary64)) (.f64 im im))) #s(literal 1/2 binary64)) (*.f64 re re))) #s(literal 1 binary64)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (-.f64 (fma.f64 (+.f64 (fma.f64 (fma.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 im im) (-.f64 (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/4320 binary64)) (.f64 im im) #s(literal 1/720 binary64)) (.f64 re re)) #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/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/12 binary64)) (.f64 im im))) #s(literal 1/2 binary64)) (.f64 re re) (.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)))
#s(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (.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(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (.f64 (.f64 im im) (fma.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)) #s(literal 1/12 binary64)) (.f64 re re) (-.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)))))
#s(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (fma.f64 (.f64 (.f64 im im) (fma.f64 (-.f64 (.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))) #s(literal 1/144 binary64)) (.f64 re re) (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)) #s(literal 1/12 binary64)))) (.f64 re re) (.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(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (fma.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) (.f64 (fma.f64 (.f64 (.f64 im im) (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/4320 binary64)) (.f64 re re) (-.f64 (.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))) #s(literal 1/144 binary64)))) (.f64 re re) (.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)) #s(literal 1/12 binary64)) (.f64 im im))) (.f64 re re))))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (-.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)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (-.f64 (fma.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)) #s(literal 1/12 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (*.f64 im im))) #s(literal 1/6 binary64)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (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/5040 binary64)) #s(literal 1/120 binary64))) #s(literal 1/144 binary64)) (.f64 re re) (.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)))) #s(literal 1/12 binary64)) (.f64 re re) (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (.f64 im im))) #s(literal 1/6 binary64)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (fma.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 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/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/12 binary64)) (.f64 (-.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 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 im im)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) #s(literal 1/4320 binary64)) (.f64 re re))) #s(literal 1/144 binary64)) (.f64 re re))) (*.f64 re re)) #s(literal 1/6 binary64))))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 re re)) (-.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))))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (-.f64 (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 re re)) (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 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) (.f64 (.f64 im im) #s(literal -1/5040 binary64))) #s(literal 1/120 binary64)))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (fma.f64 (.f64 #s(literal -1/5040 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/5040 binary64)) #s(literal 1/120 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 (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 (* -1/6 (cos re)) #s(literal -1/6 binary64))
#s(approx (* -1/6 (cos re)) (-.f64 (.f64 #s(literal 1/12 binary64) (.f64 re re)) #s(literal 1/6 binary64)))
#s(approx (* -1/6 (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/144 binary64) (.f64 re re) #s(literal 1/12 binary64)) (*.f64 re re)) #s(literal 1/6 binary64)))
#s(approx (* -1/6 (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/4320 binary64) (.f64 re re)) #s(literal 1/144 binary64)) (.f64 re re) #s(literal 1/12 binary64)) (*.f64 re re)) #s(literal 1/6 binary64)))
#s(approx (* (neg im) (cos re)) (neg.f64 im))
#s(approx (* (neg im) (cos re)) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im)))
#s(approx (* (neg im) (cos re)) (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal -1/24 binary64) (.f64 im #s(literal 1/2 binary64))) (neg.f64 im)))
#s(approx (* (neg im) (cos re)) (fma.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (.f64 im #s(literal 1/2 binary64))) re) re (neg.f64 im)))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (neg.f64 im))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)) im))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal -1/24 binary64) (*.f64 im #s(literal 1/2 binary64)))) im))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) im))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (*.f64 im #s(literal 1/2 binary64)))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (fma.f64 (.f64 (.f64 re re) im) #s(literal -1/24 binary64) (*.f64 im #s(literal 1/2 binary64))))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))))
#s(approx (* re re) (*.f64 re re))
#s(approx (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (*.f64 #s(literal -1/24 binary64) im))
#s(approx (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (*.f64 #s(literal -1/24 binary64) im)))
#s(approx (* (* re re) im) (.f64 (.f64 re re) im))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/1440 binary64) (.f64 re re) #s(literal 1/48 binary64)) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))
#s(approx (* (* 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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.f64 (-.f64 (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re)) im))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im)) (cos.f64 re)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (-.f64 (.f64 (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im)) (cos.f64 re)))
#s(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* 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 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (fma.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)) (.f64 im im) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)) (cos.f64 re)))
#s(approx (cos re) (cos.f64 re))
#s(approx (* -1/6 (cos re)) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (* (neg im) (cos re)) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (*.f64 re re) re)) im) #s(literal 1/720 binary64)))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (.f64 re re) re)) (fma.f64 (/.f64 im (.f64 re re)) #s(literal -1/24 binary64) (.f64 #s(literal 1/720 binary64) im))))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (.f64 re re) re)) (fma.f64 (/.f64 im (.f64 re re)) #s(literal -1/24 binary64) (fma.f64 (/.f64 im (.f64 (.f64 re re) (.f64 re re))) #s(literal 1/2 binary64) (*.f64 #s(literal 1/720 binary64) im)))))
#s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (+.f64 (fma.f64 (/.f64 im (.f64 re re)) #s(literal -1/24 binary64) (fma.f64 (/.f64 im (.f64 (.f64 re re) (.f64 re re))) #s(literal 1/2 binary64) (.f64 #s(literal 1/720 binary64) im))) (/.f64 (neg.f64 im) (.f64 (.f64 (.f64 re re) re) (.f64 (.f64 re re) re)))) (.f64 (.f64 (.f64 re re) re) (.f64 (.f64 re re) re))))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (.f64 (.f64 (.f64 (.f64 re re) (*.f64 re re)) im) #s(literal 1/720 binary64)))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (.f64 (.f64 (.f64 re re) (.f64 re re)) (fma.f64 (/.f64 im (.f64 re re)) #s(literal -1/24 binary64) (.f64 #s(literal 1/720 binary64) im))))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (.f64 (fma.f64 (/.f64 im (.f64 re re)) #s(literal -1/24 binary64) (fma.f64 (/.f64 im (.f64 (.f64 re re) (.f64 re re))) #s(literal 1/2 binary64) (.f64 #s(literal 1/720 binary64) im))) (.f64 (.f64 re re) (*.f64 re re))))
#s(approx (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (.f64 (.f64 (*.f64 re re) im) #s(literal 1/720 binary64)))
#s(approx (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (.f64 (fma.f64 (/.f64 im (.f64 re re)) #s(literal -1/24 binary64) (.f64 #s(literal 1/720 binary64) im)) (.f64 re re)))
#s(approx (* 1/2 (cos re)) (*.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 (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 (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 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #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)))))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (*.f64 (neg.f64 im) (cos.f64 re)))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.f64 im (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #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)))))
#s(approx im im)
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (neg.f64 (cos.f64 re)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* 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/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.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)) (cos.f64 re)))
#s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (neg.f64 (cos.f64 re)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -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 (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (-.f64 (.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)) (cos.f64 re)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (-.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)) (cos.f64 re)))
#s(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))
#s(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (.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)))
#s(approx (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (*.f64 #s(literal -1/6 binary64) (cos.f64 re)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (fma.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) (cos.f64 re) (*.f64 #s(literal -1/6 binary64) (cos.f64 re))))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))))
#s(approx (* im im) (*.f64 im im))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (*.f64 #s(literal -1/120 binary64) (cos.f64 re)))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (.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 (* -1/5040 im) (*.f64 #s(literal -1/5040 binary64) 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 (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 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(approx (exp (neg im)) (+.f64 #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 (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (-.f64 (.f64 (fma.f64 (-.f64 (.f64 (.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)) im))
#s(approx (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (.f64 (fma.f64 (-.f64 (.f64 (.f64 re re) #s(literal 1/720 binary64)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) im))
#s(approx (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (.f64 (-.f64 (.f64 (*.f64 re re) #s(literal 1/720 binary64)) #s(literal 1/24 binary64)) im))
#s(approx (* -1/24 im) (*.f64 #s(literal -1/24 binary64) im))
#s(approx (* im 1/2) (*.f64 im #s(literal 1/2 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 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (*.f64 #s(literal -2 binary64) im))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) #s(literal -2 binary64))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (.f64 #s(literal -1/3 binary64) (.f64 im im)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im) im))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (*.f64 #s(literal -1/3 binary64) im))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (.f64 (-.f64 (.f64 (*.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)) im))
#s(approx (- (* -1/60 (* im im)) 1/3) #s(literal -1/3 binary64))
#s(approx (- (* -1/60 (* im im)) 1/3) (-.f64 (.f64 (.f64 im im) #s(literal -1/60 binary64)) #s(literal 1/3 binary64)))
#s(approx (* -1/60 (* im im)) (.f64 (.f64 im im) #s(literal -1/60 binary64)))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.f64 (.f64 (pow.f64 im #s(literal 7 binary64)) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (.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/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (.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)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (.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)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (.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/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (.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 (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (.f64 (.f64 (.f64 (.f64 (.f64 im im) im) (.f64 (*.f64 im im) im)) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (.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 (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (.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 (- (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* im im)) (cos re)) (.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 (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* 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 (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* 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 (* (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (* 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 (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (.f64 (.f64 #s(literal -1/5040 binary64) (.f64 (.f64 im im) (*.f64 im im))) (cos.f64 re)))
#s(approx (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (.f64 (.f64 (.f64 im im) (.f64 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 (+ (* (* im im) (* (+ (* (* -1/5040 im) im) -1/120) (cos re))) (* -1/6 (cos re))) (.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)))) (.f64 (.f64 im im) (*.f64 im im))))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/5040 binary64)))
#s(approx (* (+ (* (* -1/5040 im) im) -1/120) (cos re)) (.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 (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/60 binary64)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64)))))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (.f64 (.f64 (.f64 im im) (.f64 im im)) #s(literal -1/60 binary64)))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 (.f64 im im) (*.f64 im im)))))
#s(approx (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) (.f64 (-.f64 (neg.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (.f64 im im))) #s(literal 1/60 binary64)) (.f64 (.f64 im im) (.f64 im im))))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (.f64 (.f64 (.f64 im im) (.f64 im im)) #s(literal -1/60 binary64)))
#s(approx (* (* (- (* -1/60 (* im im)) 1/3) im) im) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (.f64 (.f64 im im) (*.f64 im im)))))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/60 binary64)))
#s(approx (* (- (* -1/60 (* im im)) 1/3) im) (.f64 (.f64 (.f64 im im) (neg.f64 im)) (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64))))
#s(approx (- (* -1/60 (* im im)) 1/3) (.f64 (.f64 im im) #s(literal -1/60 binary64)))
#s(approx (- (* -1/60 (* im im)) 1/3) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 1/3 binary64) (.f64 im im)) #s(literal 1/60 binary64)) (*.f64 im im))))
#s(approx (* (* 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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (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 (* im (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re)))) (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 (* (- (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 (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (neg.f64 im) (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) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (.f64 (neg.f64 im) (-.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))))
#s(approx (+ (* (* (* re re) im) 1/720) (* -1/24 im)) (.f64 (neg.f64 im) (fma.f64 #s(literal -1/720 binary64) (.f64 re re) #s(literal 1/24 binary64))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (* (- (* (* (- (* -1/60 (* im im)) 1/3) im) im) 2) im) (neg.f64 (.f64 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 (.f64 im im) (.f64 im im))) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))))

eval450.0ms (7.7%)

Memory: -43.0MiB live, 159.4MiB allocated; 722ms collecting garbage
Compiler: Compiled 7 916 to 2 720 computations (65.6% saved)

prune65.0ms (1.1%)

Memory

-0.9MiB live, 83.0MiB allocated; 23ms collecting garbage

Pruning

26 alts after pruning (19 fresh and 7 done)

	Pruned	Kept	Total
New	417	10	427
Fresh	5	9	14
Picked	1	4	5
Done	0	3	3
Total	423	26	449

Accuracy

100.0%

Counts

449 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.9%	(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (*.f64 (cos.f64 re) #s(literal 1/2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
✓	56.8%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	3.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (/.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))))
✓	55.6%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
▶	91.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #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)))
✓	89.0%	(.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)))
	45.4%	(.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)))
	23.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.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)))) (cos.f64 re)))
✓	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	8.2%	#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)))
	45.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64))) (exp.f64 im)) #s(literal 1/2 binary64)))
	5.3%	#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.4%	#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)))
▶	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
✓	49.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
	91.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im (fma.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64))) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 im im) (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (.f64 (sin.f64 re) (sin.f64 (PI.f64)))))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 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))))) (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (cos.f64 re))))))
✓	91.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.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)) (cos.f64 re)))))
	18.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.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))))))
▶	39.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))))
	57.6%	#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)))
✓	32.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	38.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) im))))
	36.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)) im))))
	38.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (-.f64 (.f64 (fma.f64 (-.f64 (.f64 (.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)) im))))
▶	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (*.f64 re re) re)) im) #s(literal 1/720 binary64)))))

Compiler

Compiled 1 252 to 1 130 computations (9.7% saved)

series47.0ms (0.8%)

Memory

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

Counts

49 → 149

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable		Point	Expression
12.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) im) (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) (* (* (- (* -1/2520 (* im im)) 1/60) im) im) (* (- (* -1/2520 (* im im)) 1/60) im) (- (* -1/2520 (* im im)) 1/60) (* -1/2520 (* im im)) -1/2520 (* im im) im 1/60 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (/ (- 0 (* im im)) (+ 0 im)) (- 0 (* im im)) 0 (+ 0 im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (* (* (* (* (* re re) re) (* (* re re) re)) im) 1/720) (* (* (* (* re re) re) (* (* re re) re)) im) (* (* (* re re) re) (* (* re re) re)) (* (* re re) re) (* re re) 1/720 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
10.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) im) (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) (* (* (- (* -1/2520 (* im im)) 1/60) im) im) (* (- (* -1/2520 (* im im)) 1/60) im) (- (* -1/2520 (* im im)) 1/60) (* -1/2520 (* im im)) -1/2520 (* im im) im 1/60 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (/ (- 0 (* im im)) (+ 0 im)) (- 0 (* im im)) 0 (+ 0 im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (* (* (* (* (* re re) re) (* (* re re) re)) im) 1/720) (* (* (* (* re re) re) (* (* re re) re)) im) (* (* (* re re) re) (* (* re re) re)) (* (* re re) re) (* re re) 1/720 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
8.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) im) (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) (* (* (- (* -1/2520 (* im im)) 1/60) im) im) (* (- (* -1/2520 (* im im)) 1/60) im) (- (* -1/2520 (* im im)) 1/60) (* -1/2520 (* im im)) -1/2520 (* im im) im 1/60 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (/ (- 0 (* im im)) (+ 0 im)) (- 0 (* im im)) 0 (+ 0 im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (* (* (* (* (* re re) re) (* (* re re) re)) im) 1/720) (* (* (* (* re re) re) (* (* re re) re)) im) (* (* (* re re) re) (* (* re re) re)) (* (* re re) re) (* re re) 1/720 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
6.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) im) (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) (* (* (- (* -1/2520 (* im im)) 1/60) im) im) (* (- (* -1/2520 (* im im)) 1/60) im) (- (* -1/2520 (* im im)) 1/60) (* -1/2520 (* im im)) -1/2520 (* im im) im 1/60 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (/ (- 0 (* im im)) (+ 0 im)) (- 0 (* im im)) 0 (+ 0 im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (* (* (* (* (* re re) re) (* (* re re) re)) im) 1/720) (* (* (* (* re re) re) (* (* re re) re)) im) (* (* (* re re) re) (* (* re re) re)) (* (* re re) re) (* re re) 1/720 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)
4.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (* (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) im) (- (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) 2) (* (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) im) (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) im) (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) (* (* (- (* -1/2520 (* im im)) 1/60) im) im) (* (- (* -1/2520 (* im im)) 1/60) im) (- (* -1/2520 (* im im)) 1/60) (* -1/2520 (* im im)) -1/2520 (* im im) im 1/60 1/3 2 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) 1 (exp im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (/ (- 0 (* im im)) (+ 0 im)) (- 0 (* im im)) 0 (+ 0 im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg im) (cos re)) (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (* (* (* (* (* re re) re) (* (* re re) re)) im) 1/720) (* (* (* (* re re) re) (* (* re re) re)) im) (* (* (* re re) re) (* (* re re) re)) (* (* re re) re) (* re re) 1/720 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (* (cos re) (+ (* (* -1/6 im) im) -1)) (+ (* (* -1/6 im) im) -1) (* -1/6 im) -1/6 -1)

rewrite250.0ms (4.3%)

Memory

-6.0MiB live, 278.6MiB allocated; 83ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	537	4185
0	583	3953
1	2694	3950
0	9454	3831

Stop Event

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

Counts

198 → 415

Calls

Call 1

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

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

eval48.0ms (0.8%)

Memory: 19.5MiB live, 108.9MiB allocated; 11ms collecting garbage
Compiler: Compiled 6 627 to 2 586 computations (61% saved)

prune56.0ms (1%)

Memory

-38.1MiB live, 66.0MiB allocated; 9ms collecting garbage

Pruning

33 alts after pruning (22 fresh and 11 done)

	Pruned	Kept	Total
New	391	12	403
Fresh	4	10	14
Picked	1	4	5
Done	0	7	7
Total	396	33	429

Accuracy

100.0%

Counts

429 → 33

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.9%	(/.f64 (.f64 (-.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 2 binary64))) (exp.f64 (+.f64 im im))) (*.f64 (cos.f64 re) #s(literal 1/2 binary64))) (+.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
✓	56.8%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	3.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (/.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))))
✓	55.6%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
✓	91.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #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)))
✓	89.0%	(.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)))
	45.4%	(.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)))
	34.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (.f64 (-.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)) #s(literal 2 binary64))) (neg.f64 (.f64 im im))) (.f64 (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))) (neg.f64 im))))
	23.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.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)))) (cos.f64 re)))
✓	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	8.2%	#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.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (-.f64 #s(literal 1 binary64) im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	45.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64))) (exp.f64 im)) #s(literal 1/2 binary64)))
✓	3.4%	#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)))
✓	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	57.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
✓	49.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
	57.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
	37.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64))) im))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (/.f64 (-.f64 (pow.f64 (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (.f64 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))))) (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (cos.f64 re)) (.f64 im im) (.f64 #s(literal -1/6 binary64) (cos.f64 re))) (*.f64 im im) (cos.f64 re))))))
✓	91.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 im #s(approx (+ ( (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (.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)) (cos.f64 re)))))
	18.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 (.f64 im im) im)) (.f64 im im))))
	38.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) im))))
	39.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (neg.f64 (*.f64 im im)) im)))
✓	32.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 (cos.f64 re) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
	50.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (.f64 (.f64 im im) im)))))
	38.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) im))))
	36.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)) im))))
	38.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (-.f64 (.f64 (fma.f64 (-.f64 (.f64 (.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)) im))))
	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) im) #s(literal 1/720 binary64)))))
✓	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (*.f64 re re) re)) im) #s(literal 1/720 binary64)))))
	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 re re)) re) (*.f64 #s(literal 1/720 binary64) im)))))

Compiler

Compiled 1 547 to 1 162 computations (24.9% saved)

regimes151.0ms (2.6%)

Memory

18.0MiB live, 149.6MiB allocated; 34ms collecting garbage

Counts

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

Outputs

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 im #s(approx (+ (* (+ (* (* (cos re) (+ (* -1/5040 (* im im)) -1/120)) (* im im)) (* -1/6 (cos re))) (* im im)) (neg (cos re))) (-.f64 (*.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)) (cos.f64 re)))))

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

Calls

6 calls:

56.0ms	re
33.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
28.0ms	(cos.f64 re)
12.0ms	im
9.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.9%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
91.8%	1	`(cos.f64 re)`
91.8%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
98.4%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
91.8%	1	`re`
99.9%	2	`im`

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes25.0ms (0.4%)

Memory

-9.3MiB live, 36.8MiB allocated; 6ms collecting garbage

Counts

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

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

Calls

2 calls:

12.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
11.0ms	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.3%)

Memory

-6.5MiB live, 40.1MiB allocated; 2ms collecting garbage

Counts

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

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

Calls

2 calls:

10.0ms	im
8.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)

regimes18.0ms (0.3%)

Memory

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

Counts

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

9.0ms	im
7.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)

regimes20.0ms (0.3%)

Memory

-9.2MiB live, 35.8MiB allocated; 4ms 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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (-.f64 #s(literal 1 binary64) 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)) (+.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 (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)) im))))
#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 ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
(.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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 (.f64 im im) im)) (.f64 im im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64))) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (*.f64 re re) re)) im) #s(literal 1/720 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 re re)) re) (*.f64 #s(literal 1/720 binary64) im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) im) #s(literal 1/720 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.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))))))
(.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 (exp.f64 (neg.f64 im)) (exp.f64 im)) #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 #s(literal 0 binary64) (exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (-.f64 (.f64 (fma.f64 (-.f64 (.f64 (.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)) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) (fma.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.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 im) (cos.f64 re)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* -1/6 im) im) -1)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 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))) #s(approx (* (* (cos re) (+ (* (* -1/6 im) im) -1)) im) (.f64 (.f64 (cos.f64 re) im) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64)))))
(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.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 (-.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)))) (cos.f64 re)))

Outputs

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

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

Results

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

Compiler

Compiled 7 to 9 computations (-28.6% saved)

regimes59.0ms (1%)

Memory

-10.2MiB live, 45.2MiB allocated; 60ms collecting garbage

Counts

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

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

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

Calls

3 calls:

42.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
9.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)))

Results

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

Compiler

Compiled 18 to 20 computations (-11.1% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

32 → 3

Calls

Call 1

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

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))

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

Calls

1 calls:

6.0ms

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

Results

Accuracy	Segments	Branch
99.1%	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)

regimes10.0ms (0.2%)

Memory

-34.5MiB live, 14.5MiB allocated; 5ms collecting garbage

Counts

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

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

Calls

1 calls:

8.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
98.8%	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)

regimes42.0ms (0.7%)

Memory

17.7MiB live, 63.4MiB allocated; 2ms collecting garbage

Counts

28 → 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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (-.f64 #s(literal 1 binary64) 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)) (+.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 (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)) im))))
#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 ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
(.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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 (.f64 im im) im)) (.f64 im im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64))) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 (*.f64 re re) re)) im) #s(literal 1/720 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (.f64 (.f64 (.f64 re re) re) (.f64 re re)) re) (*.f64 #s(literal 1/720 binary64) im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (.f64 (pow.f64 re #s(literal 6 binary64)) im) #s(literal 1/720 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.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))))))
(.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 (exp.f64 (neg.f64 im)) (exp.f64 im)) #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 #s(literal 0 binary64) (exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))) (+.f64 #s(literal 0 binary64) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (.f64 (-.f64 (.f64 (fma.f64 (-.f64 (.f64 (.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)) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #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 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.f64 #s(literal -1/24 binary64) im)) (*.f64 im #s(literal 1/2 binary64))) re) re) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg im) (cos re)) (fma.f64 (fma.f64 (.f64 re re) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/720 binary64) (.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)))

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

Calls

6 calls:

8.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
7.0ms	re
7.0ms	im
7.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
72.0%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
69.2%	3	`(cos.f64 re)`
69.2%	3	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
59.4%	2	`re`
72.0%	2	`im`
81.8%	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)

regimes4.0ms (0.1%)

Memory

6.3MiB live, 6.3MiB allocated; 0ms 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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (-.f64 #s(literal 1 binary64) 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)) (+.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 (* (neg im) (cos re)) #s(approx (+ (* (+ (* (* re re) (+ (* (* (* re re) im) 1/720) (* -1/24 im))) (* im 1/2)) (* re re)) (neg im)) (-.f64 (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)) im))))
#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 ( (cos re) (+ (* (* -1/6 im) im) -1)) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
(.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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 (.f64 im im) im)) (.f64 im im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (+.f64 (neg.f64 im) #s(literal 1 binary64))) (exp.f64 im)) #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)))

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

regimes16.0ms (0.3%)

Memory

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

Counts

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

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

Calls

5 calls:

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

Results

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

regimes52.0ms (0.9%)

Memory

-27.7MiB live, 18.9MiB allocated; 2ms collecting garbage

Counts

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

Outputs

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
51.8%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
55.2%	3	`im`
39.2%	1	`re`
47.1%	2	`(cos.f64 re)`
47.1%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
59.7%	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)

regimes4.0ms (0.1%)

Memory

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

Counts

5 → 2

Calls

Call 1

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

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

Calls

2 calls:

2.0ms	im
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
51.8%	2	`im`
51.8%	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 12 to 13 computations (-8.3% saved)

regimes7.0ms (0.1%)

Memory

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

Accuracy

Total -18.4b remaining (-42.3%)

Threshold costs -18.4b (-42.3%)

Counts

2 → 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)))

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:

1.0ms	re
1.0ms	im
1.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
1.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
32.0%	1	`re`
32.0%	1	`(cos.f64 re)`
32.0%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
32.0%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
32.0%	1	`im`
32.0%	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 25 to 30 computations (-20% saved)

bsearch25.0ms (0.4%)

Memory

-37.6MiB live, 10.8MiB allocated; 6ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
10.0ms	0.03459771979788544	0.10003494722849415

Samples

7.0ms

80×

valid

Compiler

Compiled 300 to 271 computations (9.7% saved)

Precisions

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

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

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

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

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

adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.03459771979788544	0.10003494722849415

Compiler

Compiled 195 to 206 computations (-5.6% saved)

bsearch21.0ms (0.4%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	1.3361949958986966e-8	0.022051002277006543

Samples

7.0ms	98×	0	valid
7.0ms	46×	1	valid

Compiler

Compiled 240 to 259 computations (-7.9% saved)

Precisions

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

ival-exp: 4.0ms (38.1% of total)

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

ival-mult!: 2.0ms (19.1% of total)

adjust: 1.0ms (9.5% of total)

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

bsearch21.0ms (0.4%)

Memory

-18.7MiB live, 24.6MiB allocated; 6ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	0.10003494722849415	93.38689057677414

Samples

14.0ms

128×

valid

Compiler

Compiled 295 to 312 computations (-5.8% saved)

Precisions

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

ival-mult!: 6.0ms (53.9% of total)

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

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

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

adjust: 0.0ms (0% of total)

bsearch7.0ms (0.1%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
6.0ms	0.10003494722849415	93.38689057677414

Samples

4.0ms

48×

valid

Compiler

Compiled 351 to 360 computations (-2.6% saved)

Precisions

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

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

ival-cos: 1.0ms (38.9% of total)

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

adjust: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.590645447174061e+39	+inf
0.0ms	-7.082079913800547e+107	-0.03416981866006012

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.590645447174061e+39	+inf
0.0ms	-7.082079913800547e+107	-0.03416981866006012

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	4.590645447174061e+39	+inf
0.0ms	-7.082079913800547e+107	-0.03416981866006012

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.1536670297641554e-10
0.0ms	-7.082079913800547e+107	-0.03416981866006012

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.1536670297641554e-10
0.0ms	-7.082079913800547e+107	-0.03416981866006012

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.1536670297641554e-10

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.1536670297641554e-10
0.0ms	-inf	-7.082079913800547e+107

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-inf	-7.082079913800547e+107

Compiler

Compiled 14 to 16 computations (-14.3% saved)

derivations476.0ms (8.2%)

Memory

10.0MiB live, 386.2MiB allocated; 42ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 284 to 177 computations (37.7% saved)

preprocess430.0ms (7.4%)

Memory

1.3MiB live, 575.3MiB allocated; 114ms collecting garbage

Remove

(negabs im)

(abs re)

Compiler

Compiled 4 913 to 4 034 computations (17.9% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample2.6s (43.8%)

preprocess43.0ms (0.7%)

series9.0ms (0.1%)

rewrite189.0ms (3.2%)

eval10.0ms (0.2%)

prune8.0ms (0.1%)

series30.0ms (0.5%)

rewrite264.0ms (4.5%)

eval47.0ms (0.8%)

prune39.0ms (0.7%)

series64.0ms (1.1%)

rewrite239.0ms (4.1%)

eval450.0ms (7.7%)

prune65.0ms (1.1%)

series47.0ms (0.8%)

rewrite250.0ms (4.3%)

eval48.0ms (0.8%)

prune56.0ms (1%)

regimes151.0ms (2.6%)

regimes25.0ms (0.4%)

regimes20.0ms (0.3%)

regimes18.0ms (0.3%)

regimes20.0ms (0.3%)

regimes59.0ms (1%)

regimes8.0ms (0.1%)

regimes10.0ms (0.2%)

regimes42.0ms (0.7%)

regimes4.0ms (0.1%)

regimes16.0ms (0.3%)

regimes52.0ms (0.9%)

regimes4.0ms (0.1%)

regimes7.0ms (0.1%)

bsearch25.0ms (0.4%)

bsearch1.0ms (0%)

bsearch21.0ms (0.4%)

bsearch21.0ms (0.4%)

bsearch7.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations476.0ms (8.2%)

preprocess430.0ms (7.4%)

end0.0ms (0%)

Profiling