Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory

0.5MiB live, 0.5MiB 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.3s (46.7%)

Memory

-1.4MiB live, 2 791.2MiB allocated; 540ms collecting garbage

Samples

1.0s	1 700×	2	valid
522.0ms	2 356×	1	valid
389.0ms	4 200×	0	valid

Precisions

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

ival-exp: 943.0ms (57.3% of total)

ival-cos: 289.0ms (17.6% of total)

adjust: 222.0ms (13.5% of total)

ival-mult!: 111.0ms (6.7% of total)

ival-sub!: 80.0ms (4.9% of total)

Bogosity

preprocess44.0ms (0.9%)

Memory

6.9MiB live, 53.7MiB allocated; 5ms collecting garbage

Iterations

Useful iterations: 4 (0.0ms)

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

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs re)

(negabs im)

Compiler

Compiled 22 to 22 computations (0% saved)

series9.0ms (0.2%)

Memory

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

Counts

11 → 35

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

rewrite171.0ms (3.4%)

Memory

21.5MiB live, 300.8MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	183	710
0	194	674
1	1021	641
0	8539	609

Stop Event

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

Counts

46 → 104

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

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

eval11.0ms (0.2%)

Memory: -22.1MiB live, 24.2MiB allocated; 3ms collecting garbage
Compiler: Compiled 887 to 437 computations (50.7% saved)

prune8.0ms (0.2%)

Memory

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

Pruning

10 alts after pruning (10 fresh and 0 done)

	Pruned	Kept	Total
New	83	10	93
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	84	10	94

Accuracy

99.9%

Counts

94 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.7%	(/.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)))
▶	51.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	51.2%	(.f64 (.f64 #s(literal 1/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)))))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	93.6%	(.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)))
▶	89.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im)))
▶	93.6%	#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))
	35.3%	#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))))
▶	39.5%	#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)))
	89.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
▶	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 370 to 362 computations (2.2% saved)

series41.0ms (0.8%)

Memory

-0.3MiB live, 46.6MiB allocated; 1ms collecting garbage

Counts

32 → 127

Calls

Call 1

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

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

rewrite219.0ms (4.4%)

Memory

-30.2MiB live, 304.1MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	482	3527
0	525	3432
1	2647	3432
0	9764	3340

Stop Event

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

Counts

159 → 313

Calls

Call 1

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

eval45.0ms (0.9%)

Memory: 8.7MiB live, 109.3MiB allocated; 9ms collecting garbage
Compiler: Compiled 5 075 to 1 787 computations (64.8% saved)

prune28.0ms (0.6%)

Memory

19.4MiB live, 65.2MiB allocated; 4ms collecting garbage

Pruning

27 alts after pruning (24 fresh and 3 done)

	Pruned	Kept	Total
New	356	21	377
Fresh	2	3	5
Picked	2	3	5
Done	0	0	0
Total	360	27	387

Accuracy

100.0%

Counts

387 → 27

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.7%	(/.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)))
	51.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
✓	51.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
▶	58.0%	(.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im)))
	93.6%	(.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)))
✓	89.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im)))
	64.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 #s(approx (- ( -1/3 (* im im)) 2) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)))) im)))
	56.9%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* -1/3 (* im im)) 2) im) (.f64 (.f64 (neg.f64 im) (.f64 im im)) (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64))))))
	54.3%	(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)) im)))
	20.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im) #s(literal 3 binary64))) (fma.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (neg.f64 im) (cos.f64 re)) (-.f64 (.f64 (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im))))))
▶	93.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) im)))
	56.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))) im))
	54.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
	5.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
	89.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	55.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) im))
✓	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (cos.f64 (+.f64 re (PI.f64))) im))
	35.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
▶	39.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
	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)))
▶	30.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
▶	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 im #s(literal 5 binary64))))))
	39.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (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))))

Compiler

Compiled 1 271 to 1 141 computations (10.2% saved)

series65.0ms (1.3%)

Memory

-1.2MiB live, 140.6MiB allocated; 18ms collecting garbage

Counts

54 → 219

Calls

Call 1

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

Calls

6 calls:

Time	Variable		Point	Expression
13.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg im) (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (* (neg im) (cos re)) (neg im) im (cos re) re (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (- (* (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (* (+ (* -1/24 (* re re)) 1/2) (* re re)) (+ (* -1/24 (* re re)) 1/2) -1/24 (* re re) 1/2 1 (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (sin (+ (neg re) (/ (PI) 2))) (+ (neg re) (/ (PI) 2)) (neg re) (/ (PI) 2) (PI) 2 (- (exp (- 0 im)) (exp im)) (* (- (* -1/3 (* im im)) 2) im) (- (* -1/3 (* im im)) 2) (* -1/3 (* im im)) -1/3 (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5))) (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5)) (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) 1/120 (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im)))) (/ (cos re) (* im im)) 1/6 (/ (cos re) (* (* im im) (* im im))) (* (* im im) (* im im)) (pow im 5) 5)
13.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg im) (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (* (neg im) (cos re)) (neg im) im (cos re) re (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (- (* (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (* (+ (* -1/24 (* re re)) 1/2) (* re re)) (+ (* -1/24 (* re re)) 1/2) -1/24 (* re re) 1/2 1 (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (sin (+ (neg re) (/ (PI) 2))) (+ (neg re) (/ (PI) 2)) (neg re) (/ (PI) 2) (PI) 2 (- (exp (- 0 im)) (exp im)) (* (- (* -1/3 (* im im)) 2) im) (- (* -1/3 (* im im)) 2) (* -1/3 (* im im)) -1/3 (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5))) (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5)) (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) 1/120 (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im)))) (/ (cos re) (* im im)) 1/6 (/ (cos re) (* (* im im) (* im im))) (* (* im im) (* im im)) (pow im 5) 5)
10.0ms	re	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg im) (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (* (neg im) (cos re)) (neg im) im (cos re) re (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (- (* (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (* (+ (* -1/24 (* re re)) 1/2) (* re re)) (+ (* -1/24 (* re re)) 1/2) -1/24 (* re re) 1/2 1 (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (sin (+ (neg re) (/ (PI) 2))) (+ (neg re) (/ (PI) 2)) (neg re) (/ (PI) 2) (PI) 2 (- (exp (- 0 im)) (exp im)) (* (- (* -1/3 (* im im)) 2) im) (- (* -1/3 (* im im)) 2) (* -1/3 (* im im)) -1/3 (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5))) (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5)) (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) 1/120 (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im)))) (/ (cos re) (* im im)) 1/6 (/ (cos re) (* (* im im) (* im im))) (* (* im im) (* im im)) (pow im 5) 5)
8.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg im) (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (* (neg im) (cos re)) (neg im) im (cos re) re (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (- (* (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (* (+ (* -1/24 (* re re)) 1/2) (* re re)) (+ (* -1/24 (* re re)) 1/2) -1/24 (* re re) 1/2 1 (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (sin (+ (neg re) (/ (PI) 2))) (+ (neg re) (/ (PI) 2)) (neg re) (/ (PI) 2) (PI) 2 (- (exp (- 0 im)) (exp im)) (* (- (* -1/3 (* im im)) 2) im) (- (* -1/3 (* im im)) 2) (* -1/3 (* im im)) -1/3 (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5))) (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5)) (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) 1/120 (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im)))) (/ (cos re) (* im im)) 1/6 (/ (cos re) (* (* im im) (* im im))) (* (* im im) (* im im)) (pow im 5) 5)
7.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (+ (* (neg im) (cos re)) (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im)) (* (neg im) (cos re)) (neg im) im (cos re) re (* (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) im) (* (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) im) (* (* (+ (* (* -1/120 im) im) -1/6) (cos re)) im) (* (+ (* (* -1/120 im) im) -1/6) (cos re)) (+ (* (* -1/120 im) im) -1/6) (* -1/120 im) -1/120 -1/6 (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (- (* (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (* (+ (* -1/24 (* re re)) 1/2) (* re re)) (+ (* -1/24 (* re re)) 1/2) -1/24 (* re re) 1/2 1 (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (sin (+ (neg re) (/ (PI) 2))) (+ (neg re) (/ (PI) 2)) (neg re) (/ (PI) 2) (PI) 2 (- (exp (- 0 im)) (exp im)) (* (- (* -1/3 (* im im)) 2) im) (- (* -1/3 (* im im)) 2) (* -1/3 (* im im)) -1/3 (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5))) (* (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (pow im 5)) (+ (* (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) 1/120 (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im)))) (/ (cos re) (* im im)) 1/6 (/ (cos re) (* (* im im) (* im im))) (* (* im im) (* im im)) (pow im 5) 5)

rewrite196.0ms (3.9%)

Memory

13.3MiB live, 337.4MiB allocated; 30ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	877	8076
0	949	7293
1	5027	7287
0	8034	7056

Stop Event

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

Counts

273 → 463

Calls

Call 1

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

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

eval83.0ms (1.7%)

Memory: -22.1MiB live, 144.0MiB allocated; 51ms collecting garbage
Compiler: Compiled 7 846 to 3 035 computations (61.3% saved)

prune35.0ms (0.7%)

Memory

-12.8MiB live, 86.3MiB allocated; 6ms collecting garbage

Pruning

32 alts after pruning (27 fresh and 5 done)

	Pruned	Kept	Total
New	489	9	498
Fresh	1	18	19
Picked	3	2	5
Done	0	3	3
Total	493	32	525

Accuracy

100.0%

Counts

525 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	4.7%	(/.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)))
	51.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
✓	51.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	93.6%	(.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)))
✓	89.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (*.f64 im im)) #s(literal 2 binary64)) im)))
	64.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 #s(approx (- ( -1/3 (* im im)) 2) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)))) im)))
	56.9%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* -1/3 (* im im)) 2) im) (.f64 (.f64 (neg.f64 im) (.f64 im im)) (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64))))))
	58.0%	(.f64 (.f64 #s(literal 1/2 binary64) #s(approx (sin (+ (neg re) (/ (PI) 2))) (sin.f64 (-.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) re)))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)) im)))
	54.3%	(.f64 #s(approx ( (cos re) 1/2) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)) im)))
	52.4%	#s(approx (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 #s(literal 1/120 binary64) (cos.f64 re) (/.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (*.f64 im im))) (neg.f64 (pow.f64 im #s(literal 5 binary64))))))
▶	93.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) (.f64 im im) (*.f64 (neg.f64 im) (cos.f64 re))))
	20.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (neg.f64 (pow.f64 (.f64 im (cos.f64 re)) #s(literal 3 binary64))) (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im (cos.f64 re))) im) im) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (*.f64 im (cos.f64 re))) im) im))))))
	56.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))) im))
	54.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
▶	5.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	4.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
▶	89.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	55.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (fma.f64 (sin.f64 re) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 re) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) im))
✓	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (cos.f64 (+.f64 re (PI.f64))) im))
	35.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
✓	39.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
	14.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) #s(approx (- ( (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (.f64 (.f64 (.f64 re re) (.f64 re re)) #s(literal -1/24 binary64)))) im))
	18.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 (.f64 im im) im)) (+.f64 #s(literal 0 binary64) (fma.f64 im im (*.f64 #s(literal 0 binary64) im))))))
	40.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 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)))
✓	30.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 (pow.f64 im #s(literal 5/2 binary64)) #s(literal 2 binary64))))))
	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 #s(approx (+ ( (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im)))) (pow.f64 im #s(literal 5 binary64))))))
	39.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (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))))

Compiler

Compiled 1 578 to 1 437 computations (8.9% saved)

series37.0ms (0.8%)

Memory

-7.3MiB live, 85.9MiB allocated; 5ms collecting garbage

Counts

44 → 157

Calls

Call 1

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

Calls

6 calls:

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

rewrite469.0ms (9.4%)

Memory

81.0MiB live, 356.7MiB allocated; 136ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	704	4544
0	762	4180
1	4081	4172
0	9094	4038

Stop Event

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

Counts

201 → 387

Calls

Call 1

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

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

eval49.0ms (1%)

Memory: 11.2MiB live, 99.6MiB allocated; 14ms collecting garbage
Compiler: Compiled 5 043 to 1 995 computations (60.4% saved)

prune124.0ms (2.5%)

Memory

-8.2MiB live, 92.2MiB allocated; 104ms collecting garbage

Pruning

35 alts after pruning (29 fresh and 6 done)

	Pruned	Kept	Total
New	413	14	427
Fresh	7	15	22
Picked	3	2	5
Done	1	4	5
Total	424	35	459

Accuracy

100.0%

Counts

459 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	51.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	93.6%	(.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)))
	64.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 #s(approx (- ( -1/3 (* im im)) 2) (neg.f64 (.f64 (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64)) (*.f64 im im)))) im)))
	56.9%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* -1/3 (* im im)) 2) im) (.f64 (.f64 (neg.f64 im) (.f64 im im)) (+.f64 (/.f64 #s(literal 2 binary64) (.f64 im im)) #s(literal 1/3 binary64))))))
	52.4%	#s(approx (* (* 1/2 (sin (+ (neg re) (/ (PI) 2)))) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (.f64 (fma.f64 #s(literal 1/120 binary64) (cos.f64 re) (/.f64 (fma.f64 (cos.f64 re) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 im im))) (*.f64 im im))) (neg.f64 (pow.f64 im #s(literal 5 binary64))))))
	20.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 im (cos.f64 re)) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))) im) im) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (.f64 im (cos.f64 re)) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))) im) im) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (.f64 im (cos.f64 re)) (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64))) im) im) (*.f64 (neg.f64 im) (cos.f64 re)))))))
	56.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) re))))) (-.f64 (.f64 (.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re)) im) im) (neg.f64 (cos.f64 re)))) im))
	64.9%	#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))) (-.f64 (neg.f64 (cos.f64 re)) (.f64 (.f64 (*.f64 im im) (cos.f64 re)) #s(literal -1/6 binary64)))) im))
	53.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (.f64 #s(literal -2 binary64) im))) (cos.f64 re)) (*.f64 #s(literal 2 binary64) (cosh.f64 im))) #s(literal 1/2 binary64)))
	3.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (-.f64 (cosh.f64 im) (sinh.f64 im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	54.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (.f64 (cos.f64 re) (cos.f64 (PI.f64))) (*.f64 (sin.f64 re) (sin.f64 (PI.f64)))) im))
	3.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) #s(approx (+ 1 im) im))) #s(literal 1/2 binary64)))
	9.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (-.f64 (.f64 im #s(literal 1/2 binary64)) #s(literal 1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	5.2%	#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))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
	5.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	58.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (sin.f64 (+.f64 (neg.f64 re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
✓	89.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
✓	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (cos.f64 (+.f64 re (PI.f64))) im))
	89.8%	#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)))
	35.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 (-.f64 (.f64 #s(literal 1/720 binary64) (.f64 re re)) #s(literal 1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
✓	39.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re)) #s(literal 1 binary64))) im))
	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (-.f64 (.f64 (*.f64 re re) #s(literal 1/2 binary64)) #s(literal 1 binary64))) im))
	14.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) #s(approx (- ( (+ (* -1/24 (* re re)) 1/2) (* re re)) 1) (.f64 (.f64 (.f64 re re) (.f64 re re)) #s(literal -1/24 binary64)))) im))
	18.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 (.f64 im im) im)) (+.f64 #s(literal 0 binary64) (fma.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.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 #s(approx (- ( (* im im) -1/6) 1) (.f64 (.f64 #s(literal -1/6 binary64) im) im)) im)))
✓	30.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	32.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) #s(approx (* (- (* (* im im) -1/6) 1) im) (.f64 (.f64 (*.f64 im im) im) #s(literal -1/6 binary64)))))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 (fma.f64 (cos.f64 re) #s(literal 1/120 binary64) (fma.f64 (/.f64 (cos.f64 re) (.f64 im im)) #s(literal 1/6 binary64) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im))))) (pow.f64 (pow.f64 im #s(literal 5/2 binary64)) #s(literal 2 binary64))))))
	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* (cos re) (+ (* -1/120 (* im im)) -1/6)) im) im) (neg (cos re))) im) (neg.f64 (.f64 #s(approx (+ ( (cos re) 1/120) (+ (* (/ (cos re) (* im im)) 1/6) (/ (cos re) (* (* im im) (* im im))))) (/.f64 (cos.f64 re) (.f64 (.f64 im im) (*.f64 im im)))) (pow.f64 im #s(literal 5 binary64))))))
	56.9%	#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)))))
	39.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (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))))

Compiler

Compiled 1 714 to 1 262 computations (26.4% saved)

regimes85.0ms (1.7%)

Memory

11.2MiB live, 152.5MiB allocated; 12ms collecting garbage

Counts

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

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

Outputs

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes20.0ms (0.4%)

Memory

-7.0MiB live, 39.1MiB allocated; 3ms collecting garbage

Counts

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

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

Outputs

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

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

Calls

2 calls:

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

regimes27.0ms (0.5%)

Memory

9.3MiB live, 55.2MiB allocated; 3ms collecting garbage

Counts

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

Outputs

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

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 20 computations (-11.1% saved)

regimes8.0ms (0.2%)

Memory

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

Outputs

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

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

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

Compiler

Compiled 11 to 11 computations (0% saved)

regimes9.0ms (0.2%)

Memory

-29.0MiB live, 17.2MiB allocated; 3ms collecting garbage

Counts

26 → 3

Calls

Call 1

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

Outputs

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

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (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 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 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
99.4%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 11 to 11 computations (0% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

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

Outputs

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

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

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

Calls

1 calls:

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

regimes46.0ms (0.9%)

Memory

-13.9MiB live, 82.2MiB allocated; 14ms collecting garbage

Counts

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

Outputs

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

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

Outputs

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

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

Calls

1 calls:

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

Compiler

Compiled 11 to 11 computations (0% saved)

regimes4.0ms (0.1%)

Memory

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

Counts

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

Outputs

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

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

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

Calls

1 calls:

3.0ms

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

Results

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

regimes11.0ms (0.2%)

Memory

-25.6MiB live, 20.8MiB allocated; 3ms collecting garbage

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
64.9%	2	`(cos.f64 re)`
64.9%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
64.9%	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 17 to 19 computations (-11.8% saved)

regimes12.0ms (0.2%)

Memory

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

Counts

5 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 25 to 30 computations (-20% saved)

regimes12.0ms (0.2%)

Memory

-15.6MiB live, 31.2MiB allocated; 2ms collecting garbage

Counts

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
38.8%	2	`(cos.f64 re)`
38.8%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
57.6%	2	`im`
57.6%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
38.8%	2	`re`
57.7%	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 25 to 30 computations (-20% saved)

regimes7.0ms (0.1%)

Memory

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

Accuracy

Total -16.4b remaining (-36.7%)

Threshold costs -16.4b (-36.7%)

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

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

Calls

6 calls:

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

bsearch15.0ms (0.3%)

Memory

-32.1MiB live, 20.3MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
14.0ms	0.08375761200286524	0.9319659972368445

Samples

8.0ms

96×

valid

Compiler

Compiled 219 to 232 computations (-5.9% saved)

Precisions

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

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

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

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

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

adjust: 0.0ms (0% of total)

bsearch16.0ms (0.3%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
14.0ms	0.0012219644914118065	0.08375761200286524

Samples

9.0ms

112×

valid

Compiler

Compiled 239 to 254 computations (-6.3% saved)

Precisions

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

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

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

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

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

adjust: 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	1.0166912446523508	+inf
0.0ms	-inf	-8.745319435669287e-7

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.0166912446523508	+inf
0.0ms	-inf	-8.745319435669287e-7

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	1.0166912446523508	+inf
0.0ms	-inf	-8.745319435669287e-7

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	1.0166912446523508	+inf
0.0ms	-inf	-8.745319435669287e-7

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	8.36971001998536e-9
0.0ms	-inf	-8.745319435669287e-7

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	8.36971001998536e-9
0.0ms	-inf	-8.745319435669287e-7

Compiler

Compiled 14 to 16 computations (-14.3% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	8.36971001998536e-9
0.0ms	-inf	-8.745319435669287e-7

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.03283116202006782	-0.019941669591147484

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-inf	-8.745319435669287e-7

Compiler

Compiled 14 to 16 computations (-14.3% saved)

derivations474.0ms (9.5%)

Memory

-6.0MiB live, 422.6MiB allocated; 105ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 225 to 132 computations (41.3% saved)

preprocess255.0ms (5.1%)

Memory

20.9MiB live, 492.6MiB allocated; 32ms collecting garbage

Remove

(negabs im)

(abs re)

Compiler

Compiled 3 876 to 3 061 computations (21% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample2.3s (46.7%)

preprocess44.0ms (0.9%)

series9.0ms (0.2%)

rewrite171.0ms (3.4%)

eval11.0ms (0.2%)

prune8.0ms (0.2%)

series41.0ms (0.8%)

rewrite219.0ms (4.4%)

eval45.0ms (0.9%)

prune28.0ms (0.6%)

series65.0ms (1.3%)

rewrite196.0ms (3.9%)

eval83.0ms (1.7%)

prune35.0ms (0.7%)

series37.0ms (0.8%)

rewrite469.0ms (9.4%)

eval49.0ms (1%)

prune124.0ms (2.5%)

regimes85.0ms (1.7%)

regimes20.0ms (0.4%)

regimes27.0ms (0.5%)

regimes8.0ms (0.2%)

regimes9.0ms (0.2%)

regimes7.0ms (0.1%)

regimes46.0ms (0.9%)

regimes6.0ms (0.1%)

regimes4.0ms (0.1%)

regimes11.0ms (0.2%)

regimes12.0ms (0.2%)

regimes12.0ms (0.2%)

regimes7.0ms (0.1%)

bsearch15.0ms (0.3%)

bsearch16.0ms (0.3%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations474.0ms (9.5%)

preprocess255.0ms (5.1%)

end0.0ms (0%)

Profiling