Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

analyze0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 14 to 13 computations (7.1% saved)

sample2.5s (23.7%)

Memory

-22.6MiB live, 2 311.2MiB allocated

Samples

698.0ms	1 563×	2	valid
661.0ms	2 438×	1	valid
492.0ms	4 255×	0	valid

Precisions

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

ival-exp: 839.0ms (52.9% of total)

ival-cos: 250.0ms (15.8% of total)

ival-sub: 215.0ms (13.6% of total)

ival-mult: 139.0ms (8.8% of total)

adjust: 125.0ms (7.9% of total)

exact: 9.0ms (0.6% of total)

ival-true: 6.0ms (0.4% of total)

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

Bogosity

explain369.0ms (3.4%)

Memory

15.5MiB live, 447.7MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Example	Subexpression
127	-	-	`(-.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	127	0

Confusion

	Predicted +	Predicted -
+	127	0
-	0	129

Precision

1.0

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	127	0	0
-	0	0	129

Precision?

1.0

Recall?

1.0

Freqs

test

number	freq
0	129
1	127

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

75.0ms	158×	1	valid
43.0ms	96×	2	valid
25.0ms	258×	0	valid

Compiler

Compiled 206 to 96 computations (53.4% saved)

Precisions

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

ival-exp: 80.0ms (67.4% of total)

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

ival-sub: 9.0ms (7.6% of total)

adjust: 8.0ms (6.7% of total)

ival-mult: 8.0ms (6.7% of total)

exact: 1.0ms (0.8% of total)

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

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

preprocess169.0ms (1.6%)

Memory

0.6MiB live, 85.3MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	29	59
1	79	55
2	234	55
3	732	55
4	1670	55
5	2308	55
6	2516	55
7	2788	55
8	3052	55
9	3249	55
10	3299	55
11	3307	55
12	3307	55
13	3307	55
0	11	12
0	18	11
1	29	11
2	58	11
3	129	11
4	238	11
5	367	11
6	546	11
7	794	11
8	1084	11
9	1219	11
10	1254	11
11	1261	11
12	1261	11
0	1261	11

Stop Event

1×	iter limit
1×	saturated
1×	iter limit
1×	saturated

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

Symmetry

(abs re)

(negabs im)

Compiler

Compiled 12 to 11 computations (8.3% saved)

eval0.0ms (0%)

Memory: 0.3MiB live, 0.3MiB allocated
Compiler: Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Alt Table

Click to see full alt table

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

simplify45.0ms (0.4%)

Memory

5.0MiB live, 41.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Score
cost-diff	0	(cos.f64 re)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
cost-diff	64	(-.f64 #s(literal 0 binary64) im)

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	11	38
0	18	34
1	29	34
2	58	34
3	129	34
4	238	34
5	367	34
6	546	34
7	794	34
8	1084	34
9	1219	34
10	1254	34
11	1261	34
12	1261	34
0	1261	34

Stop Event

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

localize84.0ms (0.8%)

Memory

14.3MiB live, 96.1MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	0	(cos.f64 re)
accuracy	0.046875	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
accuracy	29.957114508469253	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))

Samples

32.0ms	48×	2	valid
29.0ms	79×	1	valid
13.0ms	129×	0	valid

Compiler

Compiled 78 to 24 computations (69.2% saved)

Precisions

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

ival-exp: 21.0ms (36% of total)

ival-cos: 19.0ms (32.6% of total)

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

adjust: 4.0ms (6.9% of total)

ival-sub: 3.0ms (5.1% of total)

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

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

exact: 0.0ms (0% of total)

series27.0ms (0.3%)

Memory

-22.4MiB live, 14.2MiB allocated

Counts

6 → 84

Calls

Call 1

Inputs
#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())
#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())
#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())
#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())

Outputs
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow re 2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 im) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* 1/2 im)))) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im)))))) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())

Calls

6 calls:

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

simplify306.0ms (2.9%)

Memory

40.5MiB live, 261.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	126	650
1	321	616
2	909	610
3	2943	589
4	6409	589
0	8371	556

Stop Event

1×	iter limit
1×	node limit

Counts

84 → 84

Calls

Call 1

Inputs
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 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)))))))
(+ (* 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))))))))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
1
(+ 1 (* -1/2 (pow re 2)))
(+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))
(+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(cos re)
(cos re)
(cos re)
(cos re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(cos re)
(cos re)
(cos re)
(cos re)
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* 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)))))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
1
(+ 1 im)
(+ 1 (* im (+ 1 (* 1/2 im))))
(+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(exp im)
(exp im)
(exp im)
(exp im)
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(exp im)
(exp im)
(exp im)
(exp im)

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

rewrite160.0ms (1.5%)

Memory

-5.8MiB live, 162.0MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	11	30
0	18	27
1	54	27
2	351	27
0	4157	27

Stop Event

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

Counts

6 → 206

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval54.0ms (0.5%)

Memory: -21.2MiB live, 102.5MiB allocated
Compiler: Compiled 6 074 to 864 computations (85.8% saved)

prune108.0ms (1%)

Memory

-8.3MiB live, 29.6MiB allocated

Pruning

8 alts after pruning (8 fresh and 0 done)

	Pruned	Kept	Total
New	282	8	290
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	283	8	291

Accuracy

99.9%

Counts

291 → 8

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
▶	93.5%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	91.9%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
▶	84.6%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
	52.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(literal -2 binary64) im)))
	40.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
▶	40.7%	#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)))
▶	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 212 to 176 computations (17% saved)

simplify202.0ms (1.9%)

Memory

9.9MiB live, 163.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(neg.f64 im)
cost-diff	0	(exp.f64 (neg.f64 im))
cost-diff	0	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
cost-diff	0	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
cost-diff	0	(exp.f64 (neg.f64 im))
cost-diff	0	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
cost-diff	0	(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))
cost-diff	0	#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)))
cost-diff	0	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))
cost-diff	0	(cos.f64 re)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
cost-diff	0	(cos.f64 re)
cost-diff	0	(neg.f64 (cos.f64 re))
cost-diff	0	(*.f64 (neg.f64 (cos.f64 re)) im)
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
cost-diff	0	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))
cost-diff	0	(cos.f64 re)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	39	296
0	63	290
1	114	290
2	208	290
3	434	290
4	864	290
5	1665	290
6	2264	290
7	2553	290
8	2757	290
9	2876	290
10	2944	290
11	3146	290
12	3587	290
13	3913	290
14	5890	290
15	7884	290
0	8178	290

Stop Event

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

Calls

Call 1

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

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

localize221.0ms (2.1%)

Memory

1.8MiB live, 252.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	0	(cos.f64 re)
accuracy	0.046875	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
accuracy	29.957114508469253	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0	(exp.f64 (neg.f64 im))
accuracy	0	(exp.f64 im)
accuracy	21.295212769775393	#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)))
accuracy	29.957114508469253	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0.046875	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.05078125	(.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)
accuracy	0.09375	(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy	9.79369479180996	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))
accuracy	0	(neg.f64 (cos.f64 re))
accuracy	0	(cos.f64 re)
accuracy	0.08984375	(*.f64 (neg.f64 (cos.f64 re)) im)
accuracy	30.386396137745713	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
accuracy	0.0390625	(fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64))
accuracy	0.046875	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.0625	(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
accuracy	4.127268966096501	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))

Samples

59.0ms	48×	2	valid
55.0ms	79×	1	valid
36.0ms	129×	0	valid

Compiler

Compiled 482 to 67 computations (86.1% saved)

Precisions

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

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

ival-mult: 28.0ms (26.1% of total)

adjust: 13.0ms (12.1% of total)

const: 12.0ms (11.2% of total)

ival-add: 7.0ms (6.5% of total)

ival-cos: 6.0ms (5.6% of total)

ival-sub: 5.0ms (4.7% of total)

ival-neg: 2.0ms (1.9% of total)

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

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

exact: 0.0ms (0% of total)

series50.0ms (0.5%)

Memory

1.8MiB live, 37.4MiB allocated

Counts

20 → 312

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable		Point	Expression
30.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 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/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (exp im))
3.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 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/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (exp im))
2.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 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/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (exp im))
2.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 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/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (exp im))
1.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 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/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (exp im))

simplify217.0ms (2%)

Memory

34.3MiB live, 179.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	207	3046
1	556	2872
2	1667	2839
3	3724	2787
0	8180	2643

Stop Event

1×	iter limit
1×	node limit

Counts

312 → 312

Calls

Call 1

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

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

rewrite241.0ms (2.2%)

Memory

-11.2MiB live, 270.7MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	39	210
0	63	204
1	205	204
2	1123	204
0	9050	204

Stop Event

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

Counts

20 → 519

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval289.0ms (2.7%)

Memory: -12.2MiB live, 457.1MiB allocated
Compiler: Compiled 20 564 to 2 643 computations (87.1% saved)

prune39.0ms (0.4%)

Memory

33.3MiB live, 111.6MiB allocated

Pruning

23 alts after pruning (19 fresh and 4 done)

	Pruned	Kept	Total
New	1 022	19	1 041
Fresh	3	0	3
Picked	1	4	5
Done	0	0	0
Total	1 026	23	1 049

Accuracy

100.0%

Counts

1 049 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	53.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	52.6%	(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
✓	93.5%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	62.0%	(.f64 #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 (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	61.6%	(.f64 #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 (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
▶	62.2%	(.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 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	57.1%	(.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
▶	91.9%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
▶	84.6%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	27.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (pow.f64 (neg.f64 im) #s(literal 3 binary64)) (.f64 (pow.f64 im #s(literal -2 binary64)) (cos.f64 re))))
✓	40.7%	#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)))
	40.5%	#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)))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 re))) im))
	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 im) im) (*.f64 (pow.f64 im #s(literal -1 binary64)) (cos.f64 re))))
✓	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	61.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.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(literal 1/2 binary64)))
▶	38.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
	61.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.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)))
	61.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
	56.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
▶	30.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))

Compiler

Compiled 652 to 499 computations (23.5% saved)

simplify218.0ms (2%)

Memory

-31.6MiB live, 125.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 19 expressions of interest:

New	Metric	Score	Program
cost-diff	0	(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
cost-diff	0	(cos.f64 re)
cost-diff	0	(*.f64 (cos.f64 re) im)
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))))
cost-diff	0	(*.f64 re re)
cost-diff	0	(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
cost-diff	0	#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
cost-diff	0	(.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 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
cost-diff	0	(fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64))
cost-diff	0	#s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64)))
cost-diff	0	(.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im)
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
cost-diff	0	(neg.f64 im)
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
cost-diff	0	(fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))
cost-diff	0	(cos.f64 re)
cost-diff	0	(.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)))
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	55	409
0	86	405
1	167	405
2	338	405
3	802	401
4	1741	401
5	3706	401
6	4973	401
7	5998	401
8	6532	401
9	6895	401
10	6994	401
11	7170	401
12	7181	401
13	7718	401
0	8110	401

Stop Event

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

Calls

Call 1

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

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

localize289.0ms (2.7%)

Memory

12.6MiB live, 397.4MiB allocated

Localize:

Found 19 expressions of interest:

New	Metric	Score
accuracy	0.05859375	(.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
accuracy	0.08984375	(*.f64 (cos.f64 re) im)
accuracy	0.09375	(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
accuracy	9.795915166346848	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))))
accuracy	0.046875	(.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 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.0625	(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
accuracy	4.127268966096501	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))
accuracy	29.505156601041598	#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
accuracy	0.08203125	(fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))
accuracy	0.08984375	(.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im)
accuracy	29.593373149702664	#s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64)))
accuracy	30.386396137745713	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
accuracy	0	(neg.f64 im)
accuracy	21.295212769775393	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))
accuracy	30.383370411826807	#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im))
accuracy	0.05078125	(fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))
accuracy	0.0703125	(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
accuracy	0.0703125	(.f64 (.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)
accuracy	5.114212224317873	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))

Samples

91.0ms	79×	1	valid
82.0ms	48×	2	valid
59.0ms	129×	0	valid

Compiler

Compiled 611 to 95 computations (84.5% saved)

Precisions

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

ival-mult: 65.0ms (34% of total)

const: 43.0ms (22.5% of total)

ival-exp: 35.0ms (18.3% of total)

ival-add: 18.0ms (9.4% of total)

adjust: 15.0ms (7.9% of total)

ival-cos: 6.0ms (3.1% of total)

ival-sub: 5.0ms (2.6% of total)

ival-neg: 2.0ms (1% of total)

exact: 1.0ms (0.5% of total)

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

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

series81.0ms (0.8%)

Memory

-16.5MiB live, 58.2MiB allocated

Counts

24 → 408

Calls

Call 1

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

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

Calls

6 calls:

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

simplify326.0ms (3%)

Memory

-1.5MiB live, 231.2MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	299	4597
1	869	4370
2	2956	4165
3	6648	4159
0	8280	3933

Stop Event

1×	iter limit
1×	node limit

Counts

408 → 407

Calls

Call 1

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

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

rewrite224.0ms (2.1%)

Memory

34.3MiB live, 224.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	55	327
0	86	323
1	319	323
2	2022	323
0	8369	323

Stop Event

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

Counts

24 → 354

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval317.0ms (2.9%)

Memory: 3.4MiB live, 199.6MiB allocated
Compiler: Compiled 17 472 to 2 220 computations (87.3% saved)

prune88.0ms (0.8%)

Memory

-15.6MiB live, 104.4MiB allocated

Pruning

32 alts after pruning (25 fresh and 7 done)

	Pruned	Kept	Total
New	798	12	810
Fresh	1	13	14
Picked	2	3	5
Done	0	4	4
Total	801	32	833

Accuracy

100.0%

Counts

833 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	53.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	52.6%	(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
✓	93.5%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	62.0%	(.f64 #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 (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	61.6%	(.f64 #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 (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	62.2%	(.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 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)))) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	62.2%	(.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 (fma.f64 (fma.f64 (.f64 (fma.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)))
	61.5%	(.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 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
▶	57.1%	(.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
	48.7%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 1/4 binary64)) re) re))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	13.8%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
▶	65.1%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re))))))
✓	91.9%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
✓	84.6%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))))
▶	60.5%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
	61.2%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 #s(approx ( (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	27.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (pow.f64 (neg.f64 im) #s(literal 3 binary64)) (.f64 (pow.f64 im #s(literal -2 binary64)) (cos.f64 re))))
✓	40.7%	#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)))
▶	40.5%	#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)))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 re))) im))
	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 im) im) (*.f64 (pow.f64 im #s(literal -1 binary64)) (cos.f64 re))))
✓	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	61.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.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(literal 1/2 binary64)))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
	38.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 #s(approx (+ ( -1/24 (* re re)) 1/2) (.f64 #s(literal -1/24 binary64) (.f64 re re))) (*.f64 re re) #s(literal -1 binary64))) im))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (neg.f64 (*.f64 im im)) im)))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
	30.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
	61.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.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)))
▶	56.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
✓	30.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))

Compiler

Compiled 1 001 to 754 computations (24.7% saved)

simplify204.0ms (1.9%)

Memory

-12.9MiB live, 163.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	#s(approx (exp (neg im)) #s(literal 1 binary64))
cost-diff	0	(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
cost-diff	0	(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
cost-diff	0	#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)))
cost-diff	0	(fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))
cost-diff	0	#s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)))
cost-diff	0	(.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)))
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
cost-diff	0	(*.f64 re re)
cost-diff	0	(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
cost-diff	0	#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
cost-diff	0	(.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
cost-diff	0	(*.f64 im im)
cost-diff	0	(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
cost-diff	0	(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal 1 binary64))
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re))))))
cost-diff	192	(.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))
cost-diff	1088	(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	473
0	98	469
1	175	469
2	332	465
3	784	460
4	1815	456
5	3077	456
6	4687	456
7	6509	456
0	8092	453

Stop Event

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

Calls

Call 1

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

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

localize356.0ms (3.3%)

Memory

-11.5MiB live, 186.0MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	21.295212769775393	#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)))
accuracy	29.957114508469253	(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
accuracy	31.21241274402628	#s(approx (exp (neg im)) #s(literal 1 binary64))
accuracy	0.0703125	(.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)
accuracy	0.08203125	(fma.f64 #s(literal 1/24 binary64) (*.f64 re re) #s(literal -1/2 binary64))
accuracy	5.114212224317873	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
accuracy	29.593373149702664	#s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)))
accuracy	0.05078125	(.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)
accuracy	0.09375	(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy	9.79369479180996	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))
accuracy	29.505156601041598	#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
accuracy	0.05078125	(.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)
accuracy	0.09375	(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
accuracy	9.795370231709073	#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))
accuracy	21.295212769775393	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
accuracy	0.09375	(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal 1 binary64))
accuracy	0.16015625	(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))
accuracy	9.795915166346848	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re))))))
accuracy	21.667527938233054	(/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re))))

Samples

103.0ms	48×	2	valid
98.0ms	129×	0	valid
82.0ms	79×	1	valid

Compiler

Compiled 704 to 107 computations (84.8% saved)

Precisions

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

ival-mult: 68.0ms (35.9% of total)

ival-exp: 53.0ms (28% of total)

const: 18.0ms (9.5% of total)

adjust: 16.0ms (8.4% of total)

ival-add: 12.0ms (6.3% of total)

ival-cos: 6.0ms (3.2% of total)

ival-div: 5.0ms (2.6% of total)

ival-sub: 5.0ms (2.6% of total)

ival-pow: 3.0ms (1.6% of total)

exact: 1.0ms (0.5% of total)

ival-neg: 1.0ms (0.5% of total)

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

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

series91.0ms (0.8%)

Memory

2.4MiB live, 40.4MiB allocated

Counts

28 → 456

Calls

Call 1

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

Outputs
#s(alt (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2)))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (/ (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))) (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow re 2) (+ (* -1/2 (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (* 1/24 (/ (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))))) (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow re 2) (+ (* -1/2 (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (* (pow re 2) (+ (* -1/720 (/ (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))) (* 1/24 (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))))))) (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* im (- (* 1/36 (pow im 4)) 1)) (taylor 0 re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1)))) (* im (- (* 1/36 (pow im 4)) 1))) (taylor 0 re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* im (- (* 1/36 (pow im 4)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* 1/36 (pow im 4)) 1))) (* 1/24 (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))))))) (taylor 0 re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* im (- (* 1/36 (pow im 4)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* 1/36 (pow im 4)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (* im (- (* 1/36 (pow im 4)) 1)))))))) (taylor 0 re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))) (taylor 0 re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))) (taylor 0 re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1) (taylor 0 re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1) (taylor 0 re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (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)) (* 1/24 (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))) 1) (taylor 0 re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* (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)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* 1/24 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))))) 1) (taylor 0 re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow re 2))) (taylor 0 re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2))) (taylor 0 re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2))) (taylor 0 re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow re 2))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))))) (taylor 0 re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))))))) (taylor 0 re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1))) (taylor 0 re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (/ im (- (* 1/36 (pow im 4)) 1))) (+ (* 1/2 (/ (* (pow re 2) (+ 1 (* -1/6 (pow im 2)))) (* im (- (* 1/36 (pow im 4)) 1)))) (/ 1 (* im (- (* 1/36 (pow im 4)) 1))))) (taylor 0 re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (/ im (- (* 1/36 (pow im 4)) 1))) (+ (* (pow re 2) (- (* -1 (* (pow re 2) (+ (* -1/4 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1))))))) (* -1/2 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))))) (/ 1 (* im (- (* 1/36 (pow im 4)) 1))))) (taylor 0 re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/6 (/ im (- (* 1/36 (pow im 4)) 1))) (+ (* (pow re 2) (- (* (pow re 2) (- (* -1 (* (pow re 2) (+ (* -1/720 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (+ (* 1/48 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/2 (+ (* -1/4 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))))))))) (+ (* -1/4 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1))))))) (* -1/2 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))))) (/ 1 (* im (- (* 1/36 (pow im 4)) 1))))) (taylor 0 re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt -1/2 (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/24 (pow re 2)) 1/2) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/24 (pow re 2)) 1/2) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/24 (pow re 2)) 1/2) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* im (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))) (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* 1/24 (* im (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))) (* 1/24 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))))) (taylor 0 re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (pow re 2)) (taylor inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4)) (taylor inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4)) (taylor inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4)) (taylor inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (pow re 4)) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (pow re 2)) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2)))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor -inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor -inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor -inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (taylor -inf re) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (patch #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (pow re 2)) (taylor -inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4)) (taylor -inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4)) (taylor -inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4)) (taylor -inf re) (#s(alt (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (.f64 re re) (patch (.f64 re re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor -inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor -inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor -inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor -inf re) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (patch #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (pow re 4)) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor -inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor -inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor -inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))) (taylor -inf re) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* 1/24 (pow re 2)) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (patch (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (taylor -inf re) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* 1/36 (* (pow im 4) (cos re))))) (taylor 0 im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* 1/36 (* (pow im 4) (cos re))))) (taylor 0 im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* 1/36 (* (pow im 4) (cos re))))) (taylor 0 im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow im 2))) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow im 2))) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow im 2))) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt -1 (taylor 0 im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/6 (pow im 2)) 1) (taylor 0 im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/6 (pow im 2)) 1) (taylor 0 im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/6 (pow im 2)) 1) (taylor 0 im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor 0 im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))) (taylor 0 im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))) (taylor 0 im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))) (taylor 0 im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 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))))))))) (taylor 0 im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 im)) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* 1/2 im) 1))) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1))) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ -1 (* im (cos re))) (taylor 0 im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 1/6 (/ (pow im 2) (cos re))) (/ 1 (cos re))) im) (taylor 0 im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow im 2) (+ (* -1/36 (/ (pow im 2) (cos re))) (* 1/6 (/ 1 (cos re))))) (/ 1 (cos re))) im) (taylor 0 im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow im 2) (+ (* (pow im 2) (- (* 1/216 (/ (pow im 2) (cos re))) (* 1/36 (/ 1 (cos re))))) (* 1/6 (/ 1 (cos re))))) (/ 1 (cos re))) im) (taylor 0 im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt -2 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 im) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* 1/2 im)))) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im)))))) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (* (pow im 3) (cos re))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re)))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* 1/36 (* (pow im 5) (cos re))) (taylor inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (* 1/36 (cos re)))) (taylor inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (* 1/36 (cos re)))) (taylor inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (* 1/36 (cos re)))) (taylor inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (- (/ 1 (pow im 2)) 1/6)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (- (/ 1 (pow im 2)) 1/6)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (- (/ 1 (pow im 2)) 1/6)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (* (pow im 4) (cos re))) (taylor inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))) (taylor inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))) (taylor inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))) (taylor inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ -6 (* (pow im 3) (cos re))) (taylor inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 36 (/ 1 (* (pow im 2) (cos re)))) (* 6 (/ 1 (cos re)))) (pow im 3)) (taylor inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (/ 36 (* (pow im 2) (cos re))) (+ (* 6 (/ 1 (cos re))) (/ 216 (* (pow im 4) (cos re))))) (pow im 3)) (taylor inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (+ (* 1296 (/ 1 (* (pow im 6) (cos re)))) (/ 36 (* (pow im 2) (cos re)))) (+ (* 6 (/ 1 (cos re))) (* 216 (/ 1 (* (pow im 4) (cos re)))))) (pow im 3)) (taylor inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow im 3)) (taylor inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2))))) (taylor inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2))))) (taylor inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2))))) (taylor inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 3)) (taylor inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (* (pow im 5) (cos re))) (taylor inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))) (taylor inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))) (taylor inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))) (taylor inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (* (pow im 3) (cos re))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2))))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2))))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2))))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))))) #<representation binary64>) () ())) ())
#s(alt (* 1/36 (* (pow im 5) (cos re))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ (* -1/36 (cos re)) (/ (cos re) (pow im 4))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ (* -1/36 (cos re)) (/ (cos re) (pow im 4))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ (* -1/36 (cos re)) (/ (cos re) (pow im 4))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) (patch (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))))) (patch #s(approx ( (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (*.f64 im (cos.f64 re)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (- (/ 1 (pow im 2)) 1/6)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (- (/ 1 (pow im 2)) 1/6)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (- (/ 1 (pow im 2)) 1/6)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (patch (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (taylor -inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (taylor -inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2))))) (taylor -inf im) (#s(alt (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) (patch (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (.f64 im im) (patch (.f64 im im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (.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 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) (patch (.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 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (* (pow im 4) (cos re))) (taylor -inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))) (taylor -inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))) (taylor -inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))) (taylor -inf im) (#s(alt (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) (patch (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #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))) (patch #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))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ -6 (* (pow im 3) (cos re))) (taylor -inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* 6 (/ 1 (cos re))) (* 36 (/ 1 (* (pow im 2) (cos re))))) (pow im 3))) (taylor -inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (+ (* 6 (/ 1 (cos re))) (/ 216 (* (pow im 4) (cos re)))) (/ 36 (* (pow im 2) (cos re)))) (pow im 3))) (taylor -inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (+ (* 6 (/ 1 (cos re))) (* 216 (/ 1 (* (pow im 4) (cos re))))) (+ (* 1296 (/ 1 (* (pow im 6) (cos re)))) (/ 36 (* (pow im 2) (cos re))))) (pow im 3))) (taylor -inf im) (#s(alt (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) (patch (/.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/36 binary64) #s(literal -1 binary64)) (.f64 im (cos.f64 re)))) #<representation binary64>) () ())) ())
#s(alt (* -1/6 (pow im 3)) (taylor -inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) (patch (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 3)) (taylor -inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) (patch (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (* (pow im 5) (cos re))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2)))))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4)))))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4)))))) (taylor -inf im) (#s(alt (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) (patch (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())

Calls

6 calls:

Time	Variable		Point	Expression
9.0ms	im	@	-inf	((/ 1 (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))))) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (+ (* -1/6 (* im im)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (* im im) -1/6) -1) (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (* re re) -1/4) 1/2) (* re re) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (cos re) (+ (* (+ (* 1/24 (* re re)) -1/2) (* re re)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re)))) (* (+ (* (* im im) -1/6) -1) im) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* 1/24 (* re re)) -1/2) (* (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) im) (exp im))
5.0ms	re	@	inf	((/ 1 (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))))) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (+ (* -1/6 (* im im)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (* im im) -1/6) -1) (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (* re re) -1/4) 1/2) (* re re) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (cos re) (+ (* (+ (* 1/24 (* re re)) -1/2) (* re re)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re)))) (* (+ (* (* im im) -1/6) -1) im) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* 1/24 (* re re)) -1/2) (* (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) im) (exp im))
4.0ms	im	@	inf	((/ 1 (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))))) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (+ (* -1/6 (* im im)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (* im im) -1/6) -1) (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (* re re) -1/4) 1/2) (* re re) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (cos re) (+ (* (+ (* 1/24 (* re re)) -1/2) (* re re)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re)))) (* (+ (* (* im im) -1/6) -1) im) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* 1/24 (* re re)) -1/2) (* (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) im) (exp im))
4.0ms	re	@	-inf	((/ 1 (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))))) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (+ (* -1/6 (* im im)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (* im im) -1/6) -1) (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (* re re) -1/4) 1/2) (* re re) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (cos re) (+ (* (+ (* 1/24 (* re re)) -1/2) (* re re)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re)))) (* (+ (* (* im im) -1/6) -1) im) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* 1/24 (* re re)) -1/2) (* (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) im) (exp im))
3.0ms	re	@	0	((/ 1 (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))))) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re))) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (+ (* -1/6 (* im im)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (* im im) -1/6) -1) (* im im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (* re re) -1/4) 1/2) (* re re) (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (cos re) (+ (* (+ (* 1/24 (* re re)) -1/2) (* re re)) 1) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re)))) (* (+ (* (* im im) -1/6) -1) im) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* 1/24 (* re re)) -1/2) (* (* (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) im) (exp im))

simplify260.0ms (2.4%)

Memory

26.7MiB live, 106.0MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	396	5858
1	1231	5603
2	4236	5288
0	8432	4960

Stop Event

1×	iter limit
1×	node limit

Counts

456 → 456

Calls

Call 1

Inputs
(/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))
(+ (* -1/2 (/ (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))) (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2)))))
(+ (* (pow re 2) (+ (* -1/2 (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (* 1/24 (/ (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))))) (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2)))))
(+ (* (pow re 2) (+ (* -1/2 (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))) (* (pow re 2) (+ (* -1/720 (/ (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))) (* 1/24 (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2))))))))) (/ (* im (- (* 1/36 (pow im 4)) 1)) (+ 1 (* -1/6 (pow im 2)))))
(* im (- (* 1/36 (pow im 4)) 1))
(+ (* -1/2 (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1)))) (* im (- (* 1/36 (pow im 4)) 1)))
(+ (* im (- (* 1/36 (pow im 4)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* 1/36 (pow im 4)) 1))) (* 1/24 (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1)))))))
(+ (* im (- (* 1/36 (pow im 4)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* 1/36 (pow im 4)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (* im (- (* 1/36 (pow im 4)) 1))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 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)))))))
(+ (* 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))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 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)))))))
(+ (* 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))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 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)))))))
(+ (* 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))))))))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* -1/4 (pow re 2)))
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 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)))))))
(+ (* 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))))))))
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
(- (+ (* -1/2 (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6))) 1)
(- (+ (* (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)) (* 1/24 (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))) 1)
(- (+ (* (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)) (* (pow re 2) (+ (* -1/720 (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* 1/24 (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))))) 1)
1
(+ 1 (* -1/2 (pow re 2)))
(+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))
(+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))
1
(+ 1 (* -1/2 (pow re 2)))
(+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))
(+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 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)))))))
(+ (* 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))))))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))
(+ (* -1/6 (/ im (- (* 1/36 (pow im 4)) 1))) (+ (* 1/2 (/ (* (pow re 2) (+ 1 (* -1/6 (pow im 2)))) (* im (- (* 1/36 (pow im 4)) 1)))) (/ 1 (* im (- (* 1/36 (pow im 4)) 1)))))
(+ (* -1/6 (/ im (- (* 1/36 (pow im 4)) 1))) (+ (* (pow re 2) (- (* -1 (* (pow re 2) (+ (* -1/4 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1))))))) (* -1/2 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))))) (/ 1 (* im (- (* 1/36 (pow im 4)) 1)))))
(+ (* -1/6 (/ im (- (* 1/36 (pow im 4)) 1))) (+ (* (pow re 2) (- (* (pow re 2) (- (* -1 (* (pow re 2) (+ (* -1/720 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (+ (* 1/48 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/2 (+ (* -1/4 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))))))))) (+ (* -1/4 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))) (* 1/24 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1))))))) (* -1/2 (/ (+ 1 (* -1/6 (pow im 2))) (* im (- (* 1/36 (pow im 4)) 1)))))) (/ 1 (* im (- (* 1/36 (pow im 4)) 1)))))
-1/2
(- (* 1/24 (pow re 2)) 1/2)
(- (* 1/24 (pow re 2)) 1/2)
(- (* 1/24 (pow re 2)) 1/2)
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(+ (* -1/2 (* im (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))) (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* 1/24 (* im (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))))))
(+ (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (* (pow re 2) (+ (* -1/2 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))) (* (pow re 2) (+ (* -1/720 (* im (* (pow re 2) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))) (* 1/24 (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))))))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* -1/4 (pow re 2))
(* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))
(* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))
(* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(cos re)
(cos re)
(cos re)
(cos re)
(* 1/24 (pow re 4))
(* (pow re 4) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2)))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(* 1/24 (pow re 2))
(* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(/ (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))) (+ 1 (* -1/6 (pow im 2))))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* im (* (cos re) (- (* 1/36 (pow im 4)) 1)))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* -1/4 (pow re 2))
(* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))
(* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))
(* (pow re 2) (- (* 1/2 (/ 1 (pow re 2))) 1/4))
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(cos re)
(cos re)
(cos re)
(cos re)
(* 1/24 (pow re 4))
(* (pow re 4) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/24 (/ 1 (pow re 4))) (* 1/2 (/ 1 (pow re 2)))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(/ (+ 1 (* -1/6 (pow im 2))) (* im (* (cos re) (- (* 1/36 (pow im 4)) 1))))
(* 1/24 (pow re 2))
(* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/24 (* 1/2 (/ 1 (pow re 2)))))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* im (* (cos re) (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* 1/36 (* (pow im 4) (cos re)))))
(* im (+ (* -1 (cos re)) (* 1/36 (* (pow im 4) (cos re)))))
(* im (+ (* -1 (cos re)) (* 1/36 (* (pow im 4) (cos re)))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* 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)))))))))
1
(+ 1 (* -1/6 (pow im 2)))
(+ 1 (* -1/6 (pow im 2)))
(+ 1 (* -1/6 (pow im 2)))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* 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)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
-1
(- (* -1/6 (pow im 2)) 1)
(- (* -1/6 (pow im 2)) 1)
(- (* -1/6 (pow im 2)) 1)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* 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)))))))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* 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)))))))))
(* -1 (cos re))
(+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))
(+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
(+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* 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)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
1
(+ 1 (* -1 im))
(+ 1 (* im (- (* 1/2 im) 1)))
(+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))
(/ -1 (* im (cos re)))
(/ (- (* 1/6 (/ (pow im 2) (cos re))) (/ 1 (cos re))) im)
(/ (- (* (pow im 2) (+ (* -1/36 (/ (pow im 2) (cos re))) (* 1/6 (/ 1 (cos re))))) (/ 1 (cos re))) im)
(/ (- (* (pow im 2) (+ (* (pow im 2) (- (* 1/216 (/ (pow im 2) (cos re))) (* 1/36 (/ 1 (cos re))))) (* 1/6 (/ 1 (cos re))))) (/ 1 (cos re))) im)
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* -1/6 (pow im 2)) 1))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
-2
(- (* -1/3 (pow im 2)) 2)
(- (* -1/3 (pow im 2)) 2)
(- (* -1/3 (pow im 2)) 2)
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* -1/3 (pow im 2)) 2))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
1
(+ 1 im)
(+ 1 (* im (+ 1 (* 1/2 im))))
(+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))
(* -1/6 (* (pow im 3) (cos re)))
(* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))
(* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))
(* (pow im 3) (+ (* -1 (/ (cos re) (pow im 2))) (* -1/6 (cos re))))
(* 1/36 (* (pow im 5) (cos re)))
(* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (* 1/36 (cos re))))
(* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (* 1/36 (cos re))))
(* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (* 1/36 (cos re))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1/6 (pow im 2))
(* (pow im 2) (- (/ 1 (pow im 2)) 1/6))
(* (pow im 2) (- (/ 1 (pow im 2)) 1/6))
(* (pow im 2) (- (/ 1 (pow im 2)) 1/6))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* -1/6 (pow im 2))
(* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1/120 (* (pow im 4) (cos re)))
(* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))
(* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))
(* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(/ -6 (* (pow im 3) (cos re)))
(/ (- (* 36 (/ 1 (* (pow im 2) (cos re)))) (* 6 (/ 1 (cos re)))) (pow im 3))
(/ (- (/ 36 (* (pow im 2) (cos re))) (+ (* 6 (/ 1 (cos re))) (/ 216 (* (pow im 4) (cos re))))) (pow im 3))
(/ (- (+ (* 1296 (/ 1 (* (pow im 6) (cos re)))) (/ 36 (* (pow im 2) (cos re)))) (+ (* 6 (/ 1 (cos re))) (* 216 (/ 1 (* (pow im 4) (cos re)))))) (pow im 3))
(* -1/6 (pow im 3))
(* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2)))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* -1/3 (pow im 2))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/3 (pow im 3))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/120 (* (pow im 5) (cos re)))
(* (pow im 5) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))
(* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))
(* (pow im 5) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))
(exp im)
(exp im)
(exp im)
(exp im)
(* -1/6 (* (pow im 3) (cos re)))
(* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))
(* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))
(* -1 (* (pow im 3) (+ (* 1/6 (cos re)) (/ (cos re) (pow im 2)))))
(* 1/36 (* (pow im 5) (cos re)))
(* -1 (* (pow im 5) (+ (* -1/36 (cos re)) (/ (cos re) (pow im 4)))))
(* -1 (* (pow im 5) (+ (* -1/36 (cos re)) (/ (cos re) (pow im 4)))))
(* -1 (* (pow im 5) (+ (* -1/36 (cos re)) (/ (cos re) (pow im 4)))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* -1/6 (pow im 2))
(* (pow im 2) (- (/ 1 (pow im 2)) 1/6))
(* (pow im 2) (- (/ 1 (pow im 2)) 1/6))
(* (pow im 2) (- (/ 1 (pow im 2)) 1/6))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* -1/6 (pow im 2))
(* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 2) (+ 1/6 (/ 1 (pow im 2)))))
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* -1/120 (* (pow im 4) (cos re)))
(* (pow im 4) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re))))
(* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))
(* (pow im 4) (+ (* -1 (/ (cos re) (pow im 4))) (+ (* -1/6 (/ (cos re) (pow im 2))) (* -1/120 (cos re)))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(/ -6 (* (pow im 3) (cos re)))
(* -1 (/ (- (* 6 (/ 1 (cos re))) (* 36 (/ 1 (* (pow im 2) (cos re))))) (pow im 3)))
(* -1 (/ (- (+ (* 6 (/ 1 (cos re))) (/ 216 (* (pow im 4) (cos re)))) (/ 36 (* (pow im 2) (cos re)))) (pow im 3)))
(* -1 (/ (- (+ (* 6 (/ 1 (cos re))) (* 216 (/ 1 (* (pow im 4) (cos re))))) (+ (* 1296 (/ 1 (* (pow im 6) (cos re)))) (/ 36 (* (pow im 2) (cos re))))) (pow im 3)))
(* -1/6 (pow im 3))
(* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2)))))
(* -1 (* (pow im 3) (+ 1/6 (/ 1 (pow im 2)))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* -1/3 (pow im 2))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/3 (pow im 3))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/120 (* (pow im 5) (cos re)))
(* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (* 1/6 (/ (cos re) (pow im 2))))))
(* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))
(* -1 (* (pow im 5) (+ (* 1/120 (cos re)) (+ (* 1/6 (/ (cos re) (pow im 2))) (/ (cos re) (pow im 4))))))
(exp im)
(exp im)
(exp im)
(exp im)

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

rewrite451.0ms (4.2%)

Memory

-26.0MiB live, 331.1MiB allocated

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	62	402
0	98	398
1	356	375
2	2240	375
0	8793	375

Stop Event

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

Counts

28 → 598

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval243.0ms (2.3%)

Memory: 42.9MiB live, 390.6MiB allocated
Compiler: Compiled 30 718 to 3 874 computations (87.4% saved)

prune62.0ms (0.6%)

Memory

-23.9MiB live, 192.6MiB allocated

Pruning

37 alts after pruning (28 fresh and 9 done)

	Pruned	Kept	Total
New	1 208	10	1 218
Fresh	2	18	20
Picked	3	2	5
Done	0	7	7
Total	1 213	37	1 250

Accuracy

100.0%

Counts

1 250 → 37

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	53.2%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	52.6%	(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
✓	93.5%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	62.0%	(.f64 #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 (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	61.6%	(.f64 #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 (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	62.2%	(.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 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)))) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	62.2%	(.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 (fma.f64 (fma.f64 (.f64 (fma.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)))
	61.5%	(.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 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	32.5%	(.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 #s(approx (+ (* -1/3 (* im im)) -2) (.f64 #s(literal -1/3 binary64) (.f64 im im))) im)))
	45.4%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 1/4 binary64)) re) re))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
	13.8%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64)))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	13.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) (.f64 #s(literal -1/4 binary64) (.f64 re re)))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
	52.3%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (/.f64 #s(literal 1 binary64) #s(approx (/ (+ (* -1/6 (* im im)) 1) (* (+ (* (pow im 4) 1/36) -1) (* im (cos re)))) (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 re)) im))))
✓	91.9%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
✓	84.6%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))))
	60.4%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 #s(approx (+ (* 1/24 (* re re)) -1/2) (.f64 #s(literal 1/24 binary64) (.f64 re re))) (.f64 re re) #s(literal 1 binary64))) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im))
	61.2%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 #s(approx ( (cos re) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
✓	40.7%	#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)))
✓	40.5%	#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)))
	4.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))) #s(literal 1/2 binary64)))
	3.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 re))) im))
	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 im) im) (*.f64 (pow.f64 im #s(literal -1 binary64)) (cos.f64 re))))
✓	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	61.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.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(literal 1/2 binary64)))
	39.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
	38.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 #s(approx (+ ( -1/24 (* re re)) 1/2) (.f64 #s(literal -1/24 binary64) (.f64 re re))) (*.f64 re re) #s(literal -1 binary64))) im))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 (neg.f64 (*.f64 im im)) im)))
	35.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
	30.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
	56.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)) im) (neg.f64 im))))
	61.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.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)))
✓	56.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
	56.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 im #s(literal -1/6 binary64)) im #s(literal -1 binary64)) im)))
	30.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 #s(approx (+ ( (* im im) -1/6) -1) (.f64 (.f64 im im) #s(literal -1/6 binary64))) im)))
✓	30.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (neg.f64 im)))

Compiler

Compiled 1 387 to 700 computations (49.5% saved)

regimes84.0ms (0.8%)

Memory

9.9MiB live, 207.9MiB allocated

Counts

50 → 2

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes28.0ms (0.3%)

Memory

-3.4MiB live, 74.9MiB allocated

Counts

47 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 8 to 9 computations (-12.5% saved)

regimes35.0ms (0.3%)

Memory

5.1MiB live, 86.4MiB allocated

Counts

42 → 2

Calls

Call 1

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 20 to 20 computations (0% saved)

regimes12.0ms (0.1%)

Memory

-2.3MiB live, 36.8MiB allocated

Counts

41 → 2

Calls

Call 1

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

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 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))

Calls

1 calls:

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

regimes12.0ms (0.1%)

Memory

-3.1MiB live, 35.7MiB allocated

Counts

40 → 3

Calls

Call 1

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes12.0ms (0.1%)

Memory

-4.3MiB live, 37.9MiB allocated

Counts

37 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes11.0ms (0.1%)

Memory

-3.5MiB live, 35.7MiB allocated

Counts

34 → 3

Calls

Call 1

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

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

Calls

1 calls:

9.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes59.0ms (0.5%)

Memory

-1.8MiB live, 160.1MiB allocated

Counts

32 → 3

Calls

Call 1

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

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

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

Calls

6 calls:

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

Results

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

regimes56.0ms (0.5%)

Memory

-6.8MiB live, 151.8MiB allocated

Counts

31 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

6 calls:

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

Results

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

regimes9.0ms (0.1%)

Memory

19.9MiB live, 19.9MiB allocated

Counts

30 → 3

Calls

Call 1

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

Outputs

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

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

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

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

regimes25.0ms (0.2%)

Memory

-9.2MiB live, 69.1MiB allocated

Counts

27 → 2

Calls

Call 1

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

Outputs

(*.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 (fma.f64 (fma.f64 (*.f64 (fma.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) (*.f64 (fma.f64 (fma.f64 (fma.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)))

Calls

3 calls:

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes17.0ms (0.2%)

Memory

5.3MiB live, 47.2MiB allocated

Counts

25 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes15.0ms (0.1%)

Memory

4.5MiB live, 43.9MiB allocated

Counts

23 → 2

Calls

Call 1

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

Outputs

(*.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 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) #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)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.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)))

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes14.0ms (0.1%)

Memory

-2.6MiB live, 36.6MiB allocated

Counts

20 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes17.0ms (0.2%)

Memory

4.9MiB live, 44.2MiB allocated

Counts

18 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes12.0ms (0.1%)

Memory

-4.0MiB live, 37.8MiB allocated

Counts

16 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes15.0ms (0.1%)

Memory

0.0MiB live, 39.6MiB allocated

Counts

14 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes14.0ms (0.1%)

Memory

-6.3MiB live, 32.3MiB allocated

Counts

11 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes7.0ms (0.1%)

Memory

17.2MiB live, 17.2MiB allocated

Counts

8 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes17.0ms (0.2%)

Memory

1.2MiB live, 40.0MiB allocated

Counts

6 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes16.0ms (0.1%)

Memory

-10.0MiB live, 33.2MiB allocated

Counts

4 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
37.6%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
37.6%	2	`(cos.f64 re)`
56.1%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
41.7%	2	`re`
56.1%	2	`im`
56.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 27 to 30 computations (-11.1% saved)

regimes13.0ms (0.1%)

Memory

-4.6MiB live, 34.2MiB allocated

Accuracy

Total -17.9b remaining (-40.4%)

Threshold costs -17.9b (-40.4%)

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

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:

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.286201201011504	-3.552713678800501e-15

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-237328941.03768882	-1.286201201011504

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	5.5043062179288303e-17	+inf
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	5.5043062179288303e-17	+inf
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	5.5043062179288303e-17	+inf
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	5.5043062179288303e-17	+inf
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch3.0ms (0%)

Memory

-36.9MiB live, 1.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	5.5043062179288303e-17
2.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	5.5043062179288303e-17
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.049529904067421214	0.017975230714694864

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-118664470.51884441	-0.6414686270273852

Compiler

Compiled 15 to 16 computations (-6.7% saved)

simplify40.0ms (0.4%)

Memory

15.2MiB live, 96.3MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	176	1815
1	227	1815
2	239	1815
3	244	1815
4	246	1815

Stop Event

1×

saturated

Calls

Call 1

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

soundness1.6s (15%)

Memory

0.9MiB live, 1 428.1MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	207	3046
1	556	2872
2	1667	2839
3	3724	2787
0	8180	2643
0	299	4597
1	869	4370
2	2956	4165
3	6648	4159
0	8280	3933
0	62	402
0	98	398
1	356	375
2	2240	375
0	8793	375
0	126	650
1	321	616
2	909	610
3	2943	589
4	6409	589
0	8371	556
0	396	5858
1	1231	5603
2	4236	5288
0	8432	4960
0	11	30
0	18	27
1	54	27
2	351	27
0	4157	27

Stop Event

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

Compiler

Compiled 2 063 to 892 computations (56.8% saved)

preprocess245.0ms (2.3%)

Memory: 21.3MiB live, 382.5MiB allocated
Remove: (abs re)
Compiler: Compiled 2 652 to 564 computations (78.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated