Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

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

analyze1.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.8s (45.9%)

Memory

64.2MiB live, 4 138.7MiB allocated; 802ms collecting garbage

Samples

1.1s	1 668×	2	valid
702.0ms	2 372×	1	valid
568.0ms	4 216×	0	valid

Precisions

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

ival-exp: 961.0ms (48.7% of total)

ival-cos: 352.0ms (17.8% of total)

ival-sub: 287.0ms (14.5% of total)

adjust: 201.0ms (10.2% of total)

ival-mult: 157.0ms (8% of total)

exact: 14.0ms (0.7% of total)

ival-assert: 3.0ms (0.2% of total)

Bogosity

explain231.0ms (3.8%)

Memory

-7.1MiB live, 186.5MiB allocated; 18ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Example	Subexpression
125	-	-	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
0	-	-	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
0	-	-	`(exp.f64 im)`
0	-	-	`#s(literal 0 binary64)`
0	-	-	`(cos.f64 re)`
0	-	-	`im`
0	-	-	`(-.f64 #s(literal 0 binary64) im)`
0	-	-	`re`
0	-	-	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
0	-	-	`#s(literal 1/2 binary64)`
0	-	-	`(exp.f64 (-.f64 #s(literal 0 binary64) im))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`-.f64`	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`	cancellation	125	0

Confusion

	Predicted +	Predicted -
+	125	0
-	0	131

Precision

1.0

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	125	0	0
-	0	1	130

Precision?

0.9920634920634921

Recall?

1.0

Freqs

test

number	freq
0	131
1	125

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

49.0ms	106×	2	valid
30.0ms	140×	1	valid
26.0ms	266×	0	valid

Compiler

Compiled 92 to 37 computations (59.8% saved)

Precisions

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

ival-exp: 43.0ms (53.2% of total)

ival-cos: 12.0ms (14.9% of total)

adjust: 9.0ms (11.1% of total)

ival-mult: 9.0ms (11.1% of total)

ival-sub: 7.0ms (8.7% of total)

ival-true: 1.0ms (1.2% of total)

exact: 1.0ms (1.2% of total)

ival-assert: 0.0ms (0% of total)

preprocess185.0ms (3.1%)

Memory

16.2MiB live, 79.1MiB allocated; 63ms 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
0	11	12
0	18	11
1	38	11
2	73	11
3	206	11
4	878	6
0	9277	6

Stop Event

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

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

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

Symmetry

(abs re)

(negabs im)

Compiler

Compiled 12 to 11 computations (8.3% saved)

eval0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory

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

Alt Table

Click to see full alt table

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

series9.0ms (0.2%)

Memory

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

Counts

11 → 40

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable		Point	Expression
2.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) 1/2 (cos re) re (- (exp (- 0 im)) (exp im)) (exp (- 0 im)) (- 0 im) 0 im (exp im))
2.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	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))

rewrite236.0ms (3.9%)

Memory

-35.4MiB live, 100.4MiB allocated; 20ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

51 → 109

Calls

Call 1

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

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

eval12.0ms (0.2%)

Memory: 12.6MiB live, 12.6MiB allocated; 0ms collecting garbage
Compiler: Compiled 2 030 to 446 computations (78% saved)

prune8.0ms (0.1%)

Memory

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

Pruning

8 alts after pruning (8 fresh and 0 done)

	Pruned	Kept	Total
New	100	8	108
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	101	8	109

Accuracy

99.9%

Counts

109 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
	54.3%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)))
▶	90.3%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	87.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
▶	81.3%	(.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)))
▶	87.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (cos.f64 re) (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64))) (.f64 im im) (neg.f64 (cos.f64 re))) im))
▶	41.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
▶	51.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 384 to 302 computations (21.4% saved)

series47.0ms (0.8%)

Memory

-24.0MiB live, 75.7MiB allocated; 17ms collecting garbage

Counts

42 → 152

Calls

Call 1

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

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

Calls

6 calls:

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

rewrite216.0ms (3.6%)

Memory

39.1MiB live, 310.9MiB allocated; 42ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	543	4198
0	603	4065
1	2868	4065
0	10531	3978

Stop Event

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

Counts

194 → 365

Calls

Call 1

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

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

eval71.0ms (1.2%)

Memory: -2.3MiB live, 146.9MiB allocated; 16ms collecting garbage
Compiler: Compiled 20 678 to 2 543 computations (87.7% saved)

prune40.0ms (0.7%)

Memory

-19.4MiB live, 79.6MiB allocated; 20ms collecting garbage

Pruning

23 alts after pruning (22 fresh and 1 done)

	Pruned	Kept	Total
New	525	21	546
Fresh	2	1	3
Picked	4	1	5
Done	0	0	0
Total	531	23	554

Accuracy

99.9%

Counts

554 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	87.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (- (* -1/2520 (* im im)) 1/60) #s(literal -1/60 binary64)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	55.2%	(.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 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 2 binary64) #s(literal 1/3 binary64)) (.f64 im im)))) im)))
	48.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) #s(approx (* (- (* (- (* (* (- (* -1/2520 (* im im)) 1/60) im) im) 1/3) (* im im)) 2) im) (*.f64 (-.f64 (neg.f64 (/.f64 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 2 binary64) #s(literal 1/3 binary64)) (pow.f64 im #s(literal 4 binary64)))) (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 1/60 binary64) #s(literal 1/2520 binary64))) (pow.f64 im #s(literal 7 binary64))))))
	56.2%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im)))
	52.1%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)) im)))
	51.4%	(.f64 #s(approx ( 1/2 (cos re)) (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)))
▶	55.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
▶	87.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im)))
▶	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
	50.7%	#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))
	41.2%	#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)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	51.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))
✓	51.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 #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)))) im))
	34.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))) im))
▶	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64))) im))
	51.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (.f64 (fma.f64 (/.f64 (cos.f64 re) (pow.f64 im #s(literal 4 binary64))) #s(literal -1 binary64) (fma.f64 (/.f64 #s(literal -1/6 binary64) im) (/.f64 (cos.f64 re) im) (.f64 #s(literal -1/120 binary64) (cos.f64 re)))) (pow.f64 im #s(literal 4 binary64)))) im))
	37.0%	#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))
	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))
	49.1%	#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)))
▶	27.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	34.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))

Compiler

Compiled 1 536 to 1 121 computations (27% saved)

series32.0ms (0.5%)

Memory

17.5MiB live, 64.0MiB allocated; 4ms collecting garbage

Counts

46 → 188

Calls

Call 1

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

Calls

6 calls:

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

rewrite184.0ms (3%)

Memory

7.4MiB live, 286.2MiB allocated; 27ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	671	6195
0	731	5985
1	3749	5979
0	8514	5806

Stop Event

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

Counts

234 → 399

Calls

Call 1

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

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

eval77.0ms (1.3%)

Memory: 11.4MiB live, 157.1MiB allocated; 16ms collecting garbage
Compiler: Compiled 24 836 to 2 828 computations (88.6% saved)

prune43.0ms (0.7%)

Memory

0.1MiB live, 99.0MiB allocated; 8ms collecting garbage

Pruning

28 alts after pruning (24 fresh and 4 done)

	Pruned	Kept	Total
New	574	10	584
Fresh	3	14	17
Picked	2	3	5
Done	0	1	1
Total	579	28	607

Accuracy

100.0%

Counts

607 → 28

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	87.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (- (* -1/2520 (* im im)) 1/60) #s(literal -1/60 binary64)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	55.2%	(.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 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 2 binary64) #s(literal 1/3 binary64)) (.f64 im im)))) im)))
	56.2%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im)))
▶	52.1%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 #s(literal -1/3 binary64) (.f64 im im)) #s(literal 2 binary64)) im)))
	51.4%	(.f64 #s(approx ( 1/2 (cos re)) (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)))
	55.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (- (* -1/2520 (* im im)) 1/60) (.f64 (.f64 #s(literal -1/2520 binary64) im) im)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	55.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2520 binary64) im) im) #s(literal 1/60 binary64)) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
✓	87.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im)))
	34.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (-.f64 (pow.f64 (.f64 (neg.f64 im) (cos.f64 re)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im) #s(literal 2 binary64))) (-.f64 (.f64 (neg.f64 im) (cos.f64 re)) (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im))))
✓	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
	50.7%	#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))
	41.2%	#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)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	51.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))
✓	51.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 #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)))) im))
	34.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))) im))
	49.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* im im) -1/6) (cos re)) (neg (cos re))) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
▶	55.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* im im) -1/6) (cos re)) (neg (cos re))) (.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (*.f64 im im))) im))
	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) (.f64 im im)) #s(literal 1 binary64))) im))
▶	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 im im) #s(literal -1/120 binary64)) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im))
	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 #s(approx (- ( (* im im) -1/120) 1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im))
	37.0%	#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))
	29.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))))
	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))
✓	27.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	50.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* im im) -1/6) (cos re)) (neg (cos re))) im) (.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (pow.f64 im #s(literal 3 binary64)))))
▶	34.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 re re) im) #s(literal 1/2 binary64) (neg.f64 im))))

Compiler

Compiled 1 869 to 1 321 computations (29.3% saved)

series44.0ms (0.7%)

Memory

-6.7MiB live, 86.5MiB allocated; 6ms collecting garbage

Counts

55 → 192

Calls

Call 1

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

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

Calls

6 calls:

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

rewrite189.0ms (3.1%)

Memory

11.8MiB live, 296.2MiB allocated; 32ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	704	5900
0	762	5674
1	3877	5654
0	8556	5451

Stop Event

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

Counts

247 → 408

Calls

Call 1

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

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

eval102.0ms (1.7%)

Memory: -12.2MiB live, 213.2MiB allocated; 52ms collecting garbage
Compiler: Compiled 26 732 to 2 978 computations (88.9% saved)

prune86.0ms (1.4%)

Memory

22.1MiB live, 156.2MiB allocated; 48ms collecting garbage

Pruning

33 alts after pruning (28 fresh and 5 done)

	Pruned	Kept	Total
New	582	11	593
Fresh	2	17	19
Picked	4	1	5
Done	0	4	4
Total	588	33	621

Accuracy

100.0%

Counts

621 → 33

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	87.0%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (- (* -1/2520 (* im im)) 1/60) #s(literal -1/60 binary64)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	55.2%	(.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 (fma.f64 (pow.f64 im #s(literal -2 binary64)) #s(literal 2 binary64) #s(literal 1/3 binary64)) (.f64 im im)))) im)))
	54.4%	(.f64 (.f64 #s(literal 1/2 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 (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (- ( -1/2520 (* im im)) 1/60) #s(literal -1/60 binary64)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	56.2%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im)))
	31.3%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 #s(approx (- (* -1/3 (* im im)) 2) (.f64 (.f64 im im) #s(literal -1/3 binary64))) im)))
	51.4%	(.f64 #s(approx ( 1/2 (cos re)) (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)))
	55.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(approx (- (* -1/2520 (* im im)) 1/60) (.f64 (.f64 #s(literal -1/2520 binary64) im) im)) im) im) #s(literal 1/3 binary64)) (*.f64 im im)) #s(literal 2 binary64)) im)))
	55.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/2520 binary64) im) im) #s(literal 1/60 binary64)) (*.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im)))
✓	87.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (*.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im)))
✓	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 (*.f64 im im) #s(literal -1/6 binary64)) (cos.f64 re) (neg.f64 (cos.f64 re))) im))
	50.7%	#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))
	41.2%	#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)))
	81.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))) im))
	51.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))
✓	51.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 #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)))) im))
	34.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 #s(approx (cos re) (fma.f64 #s(literal -1/2 binary64) (.f64 re re) #s(literal 1 binary64)))) im))
	49.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* im im) -1/6) (cos re)) (neg (cos re))) (-.f64 (.f64 (.f64 im im) #s(literal -1/6 binary64)) #s(literal 1 binary64))) im))
	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* im im) -1/6) (cos re)) (neg (cos re))) (.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (/.f64 (neg.f64 (cos.f64 re)) im) im)) (.f64 im im))) im))
	55.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* im im) -1/6) (cos re)) (neg (cos re))) (.f64 (.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (*.f64 im im))) im) im)) im))
	23.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (* im im) -1/6) (cos re)) (neg (cos re))) (.f64 #s(approx (+ ( -1/6 (cos re)) (/ (neg (cos re)) (* im im))) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (.f64 im im))) im))
	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im))
	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 #s(approx (- (* (* im im) -1/120) 1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64))) im) im) #s(literal 1 binary64))) im))
	49.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 #s(approx (- (* (* im im) -1/120) 1/6) #s(literal -1/6 binary64)) im) im) #s(literal 1 binary64))) im))
	53.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 #s(approx (- ( (* im im) -1/120) 1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im))
	37.0%	#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))
	29.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 0 binary64) im))))
	55.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp 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)))
✓	27.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
	50.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* (* im im) -1/6) (cos re)) (neg (cos re))) im) (.f64 (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (/.f64 (neg.f64 (cos.f64 re)) (.f64 im im))) (pow.f64 im #s(literal 3 binary64)))))
	34.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im))))
	29.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) #s(approx (+ (* (* (* re re) im) 1/2) (neg im)) (.f64 (fma.f64 im #s(literal 1/2 binary64) (/.f64 (neg.f64 im) (.f64 re re))) (*.f64 re re)))))
	12.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) #s(approx (+ (* (* (* re re) im) 1/2) (neg im)) (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64)))))

Compiler

Compiled 3 071 to 1 237 computations (59.7% saved)

regimes200.0ms (3.3%)

Memory

12.4MiB live, 194.8MiB allocated; 148ms collecting garbage

Counts

51 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

87.0ms	(cos.f64 re)
34.0ms	im
31.0ms	re
24.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
10.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes31.0ms (0.5%)

Memory

-17.6MiB live, 31.7MiB allocated; 16ms collecting garbage

Counts

42 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

18.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
11.0ms	im

Results

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

Compiler

Compiled 8 to 9 computations (-12.5% saved)

regimes27.0ms (0.4%)

Memory

-7.8MiB live, 38.4MiB allocated; 3ms collecting garbage

Counts

36 → 2

Calls

Call 1

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 20 to 20 computations (0% saved)

regimes9.0ms (0.1%)

Memory

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

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

Calls

1 calls:

7.0ms

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

Results

Accuracy	Segments	Branch
99.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 12 to 11 computations (8.3% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

32 → 3

Calls

Call 1

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

Outputs

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

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

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

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.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 12 to 11 computations (8.3% saved)

regimes7.0ms (0.1%)

Memory

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

Counts

29 → 3

Calls

Call 1

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

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes17.0ms (0.3%)

Memory

-22.8MiB live, 23.0MiB allocated; 4ms collecting garbage

Counts

28 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

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

Results

Accuracy	Segments	Branch
85.5%	3	`im`
94.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 13 to 13 computations (0% saved)

regimes55.0ms (0.9%)

Memory

14.8MiB live, 61.4MiB allocated; 19ms collecting garbage

Counts

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
61.9%	3	`im`
69.5%	2	`(cos.f64 re)`
69.5%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
60.8%	3	`re`
58.4%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
71.3%	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 27 to 30 computations (-11.1% saved)

regimes22.0ms (0.4%)

Memory

-16.2MiB live, 31.0MiB allocated; 4ms collecting garbage

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

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

regimes15.0ms (0.3%)

Memory

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

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes16.0ms (0.3%)

Memory

-23.4MiB live, 22.5MiB allocated; 3ms collecting garbage

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

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

regimes8.0ms (0.1%)

Memory

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

Counts

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes17.0ms (0.3%)

Memory

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

Outputs

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

Calls

5 calls:

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

Compiler

Compiled 20 to 23 computations (-15% saved)

regimes11.0ms (0.2%)

Memory

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
36.3%	2	`im`
34.2%	1	`re`
36.2%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
36.9%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
37.0%	2	`(cos.f64 re)`
37.0%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes4.0ms (0.1%)

Memory

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

Counts

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes6.0ms (0.1%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

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

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

bsearch26.0ms (0.4%)

Memory

-20.1MiB live, 28.9MiB allocated; 7ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	0.0008456367008117212	85.33923418677011

Samples

17.0ms

144×

valid

Compiler

Compiled 438 to 358 computations (18.3% saved)

Precisions

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

ival-cos: 4.0ms (37.8% of total)

ival-exp: 3.0ms (28.3% of total)

ival-mult: 2.0ms (18.9% of total)

ival-sub: 1.0ms (9.4% of total)

ival-true: 0.0ms (0% of total)

adjust: 0.0ms (0% of total)

exact: 0.0ms (0% of total)

ival-assert: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	0.0008456367008117212	85.33923418677011

Compiler

Compiled 393 to 349 computations (11.2% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-5.77202896115711e+36	-0.0008172390321924038

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.251246650071154e-6	+inf
0.0ms	-5.77202896115711e+36	-0.0008172390321924038

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.251246650071154e-6	+inf
0.0ms	-5.77202896115711e+36	-0.0008172390321924038

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.251246650071154e-6	+inf
0.0ms	-5.77202896115711e+36	-0.0008172390321924038

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.251246650071154e-6	+inf
0.0ms	-5.77202896115711e+36	-0.0008172390321924038

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	5.633034190833646e-13
0.0ms	-5.77202896115711e+36	-0.0008172390321924038

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	5.633034190833646e-13

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	5.633034190833646e-13

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.01648198898420527	0.0049632774230942665

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.01648198898420527	0.0049632774230942665

Compiler

Compiled 15 to 16 computations (-6.7% 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.01648198898420527	0.0049632774230942665

Compiler

Compiled 15 to 16 computations (-6.7% 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.01648198898420527	0.0049632774230942665

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	0.0	5.633034190833646e-13

Compiler

Compiled 15 to 16 computations (-6.7% saved)

simplify67.0ms (1.1%)

Memory

-11.9MiB live, 77.8MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	176	1262
1	277	1262
2	514	1261
3	1359	1261
4	4363	1261

Stop Event

1×	node limit

Calls

Call 1

Inputs
(if (<=.f64 im #s(literal 3 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im))))
(if (<=.f64 im #s(literal 3 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))) (.f64 #s(approx ( 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 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 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (cos.f64 re)) im)) (.f64 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (cos.f64 re)) im)) (.f64 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))) (.f64 #s(approx ( 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.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))) (.f64 #s(approx (* 1/2 (cos re)) (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))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im)) (.f64 #s(approx ( 1/2 (cos re)) (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))))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im)))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 #s(approx (- ( (* im im) -1/120) 1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im)))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (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))))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) #s(approx (+ (* (* (* re re) im) 1/2) (neg im)) (.f64 (.f64 (*.f64 re re) 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)))

Outputs
(if (<=.f64 im #s(literal 3 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (neg.f64 (cos.f64 re)) im (.f64 (.f64 (.f64 im im) (.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (cos.f64 re))) im))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im))))
(if (<=.f64 im #s(literal 3 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))) (.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (- 0 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 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))) (.f64 #s(approx ( 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/60 binary64) (.f64 im im)) #s(literal 1/3 binary64)) im) im) #s(literal 2 binary64)) im))) (.f64 #s(approx ( 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 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 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 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 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (cos.f64 re)) im)) (.f64 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (- 0 im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (cos.f64 re)) im)) (.f64 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (cos.f64 re)) im)) (.f64 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 4722366482869645/1180591620717411303424 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 (cos.f64 re)) im)) (.f64 #s(approx (* 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))) (.f64 #s(approx ( 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -4999999999999999769381329101060571136 binary64)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (-.f64 (.f64 #s(literal 1/48 binary64) (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (-.f64 (.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal -1/2520 binary64) (.f64 im im)) #s(literal 1/60 binary64)) im) im) #s(literal 1/3 binary64)) (.f64 im im)) #s(literal 2 binary64)) im))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))) (.f64 #s(approx ( 1/2 (cos re)) (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)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.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))) (.f64 #s(approx (* 1/2 (cos re)) (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))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (-.f64 (.f64 (-.f64 (.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))) (.f64 #s(approx (* 1/2 (cos re)) (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))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im)) (.f64 #s(approx ( 1/2 (cos re)) (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))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im)) (.f64 #s(approx ( 1/2 (cos re)) (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))))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) im) #s(literal 1/6 binary64)) im) im) #s(literal 1 binary64))) im)))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* (cos re) (+ (* -1/120 (* im im)) -1/6)) (* im im)) (neg (cos re))) (-.f64 (.f64 #s(approx (- ( (* im im) -1/120) 1/6) (.f64 (.f64 im im) #s(literal -1/120 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im)))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (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))))
(if (<=.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 re (.f64 re im)) #s(literal 1/2 binary64) (neg.f64 im)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) #s(approx (+ (* (* (* re re) im) 1/2) (neg im)) (.f64 (.f64 (*.f64 re re) im) #s(literal 1/2 binary64))))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) #s(approx (+ (* (* (* re re) im) 1/2) (neg im)) (.f64 (.f64 (*.f64 re re) 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)))

derivations737.0ms (12.1%)

Memory

9.4MiB live, 524.4MiB allocated; 305ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 302 to 178 computations (86.3% saved)

preprocess181.0ms (3%)

Memory: 5.3MiB live, 292.0MiB allocated; 37ms collecting garbage
Remove: (abs re)
Compiler: Compiled 3 018 to 634 computations (79% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze1.0ms (0%)

sample2.8s (45.9%)

explain231.0ms (3.8%)

preprocess185.0ms (3.1%)

eval0.0ms (0%)

prune1.0ms (0%)

series9.0ms (0.2%)

rewrite236.0ms (3.9%)

eval12.0ms (0.2%)

prune8.0ms (0.1%)

series47.0ms (0.8%)

rewrite216.0ms (3.6%)

eval71.0ms (1.2%)

prune40.0ms (0.7%)

series32.0ms (0.5%)

rewrite184.0ms (3%)

eval77.0ms (1.3%)

prune43.0ms (0.7%)

series44.0ms (0.7%)

rewrite189.0ms (3.1%)

eval102.0ms (1.7%)

prune86.0ms (1.4%)

regimes200.0ms (3.3%)

regimes31.0ms (0.5%)

regimes27.0ms (0.4%)

regimes9.0ms (0.1%)

regimes8.0ms (0.1%)

regimes7.0ms (0.1%)

regimes17.0ms (0.3%)

regimes55.0ms (0.9%)

regimes22.0ms (0.4%)

regimes15.0ms (0.3%)

regimes16.0ms (0.3%)

regimes8.0ms (0.1%)

regimes17.0ms (0.3%)

regimes11.0ms (0.2%)

regimes4.0ms (0.1%)

regimes6.0ms (0.1%)

bsearch26.0ms (0.4%)

bsearch2.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify67.0ms (1.1%)

derivations737.0ms (12.1%)

preprocess181.0ms (3%)

end0.0ms (0%)

Profiling