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.6s (22.8%)

Memory

6.5MiB live, 2 320.2MiB allocated

Samples

981.0ms	2 516×	1	valid
745.0ms	1 454×	2	valid
457.0ms	4 286×	0	valid

Precisions

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

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

ival-cos: 318.0ms (19.4% of total)

ival-mult: 279.0ms (17% of total)

adjust: 122.0ms (7.4% of total)

ival-sub: 105.0ms (6.4% of total)

exact: 10.0ms (0.6% of total)

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

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

Bogosity

explain394.0ms (3.4%)

Memory

7.1MiB live, 328.8MiB allocated

FPErrors

Click to see full error table

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

Confusion

	Predicted +	Predicted -
+	129	0
-	0	127

Precision

1.0

Recall

1.0

Confusion?

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

Precision?

1.0

Recall?

1.0

Freqs

test

number	freq
0	127
1	129

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

123.0ms	108×	2	valid
32.0ms	146×	1	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: 130.0ms

ival-exp: 92.0ms (70.9% of total)

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

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

adjust: 8.0ms (6.2% of total)

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

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

exact: 1.0ms (0.8% of total)

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

preprocess148.0ms (1.3%)

Memory

-6.6MiB live, 72.4MiB 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.4MiB live, 0.4MiB allocated
Compiler: Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.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 12 to 11 computations (8.3% saved)

simplify45.0ms (0.4%)

Memory

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

localize90.0ms (0.8%)

Memory

-2.5MiB live, 155.2MiB allocated

Localize:

Found 4 expressions of interest:

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

Samples

44.0ms	54×	2	valid
20.0ms	129×	0	valid
16.0ms	73×	1	valid

Compiler

Compiled 78 to 24 computations (69.2% saved)

Precisions

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

ival-exp: 27.0ms (43% of total)

ival-mult: 18.0ms (28.7% of total)

ival-cos: 9.0ms (14.3% of total)

adjust: 6.0ms (9.6% of total)

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

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

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

exact: 0.0ms (0% of total)

series9.0ms (0.1%)

Memory

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

simplify230.0ms (2%)

Memory

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

rewrite189.0ms (1.6%)

Memory

29.1MiB live, 105.8MiB 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>

eval43.0ms (0.4%)

Memory: 14.6MiB live, 84.9MiB allocated
Compiler: Compiled 6 074 to 864 computations (85.8% saved)

prune27.0ms (0.2%)

Memory

-16.3MiB live, 64.7MiB allocated

Pruning

9 alts after pruning (9 fresh and 0 done)

	Pruned	Kept	Total
New	281	9	290
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	282	9	291

Accuracy

99.9%

Counts

291 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.1%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im)))
	53.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	4.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (/.f64 (-.f64 (pow.f64 (exp.f64 im) #s(literal 2 binary64)) (pow.f64 (exp.f64 im) #s(literal -2 binary64))) (-.f64 (neg.f64 (exp.f64 im)) (exp.f64 (neg.f64 im)))))
▶	91.8%	(.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)))
▶	89.8%	(.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.9%	(.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)))
▶	40.3%	#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))))
	39.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
▶	52.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 268 to 212 computations (20.9% saved)

simplify440.0ms (3.8%)

Memory

-12.2MiB live, 109.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(exp.f64 im)
cost-diff	0	(neg.f64 (exp.f64 im))
cost-diff	128	(*.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64))
cost-diff	7168	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 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	(.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)))
cost-diff	0	#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))))
cost-diff	0	#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))
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 #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	(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: 3 (0.0ms)

Iter	Nodes	Cost
0	46	352
0	79	346
1	144	342
2	287	342
3	640	341
4	1424	341
5	2603	341
6	4157	341
7	5319	341
8	5774	341
9	5906	341
10	6124	341
11	6345	341
12	6579	341
13	7774	341
0	8058	341

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

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

localize324.0ms (2.8%)

Memory

-17.4MiB live, 317.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	0	(cos.f64 re)
accuracy	0.0078125	(/.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im))
accuracy	29.996454577450283	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im)))
accuracy	0	(exp.f64 im)
accuracy	3.5902933415735707	(.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)))
accuracy	23.82501668979518	#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))))
accuracy	30.015459521697196	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0.02734375	(fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64))
accuracy	0.05859375	(.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)))
accuracy	0.08203125	(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
accuracy	6.466006182974384	#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))
accuracy	0	(neg.f64 (cos.f64 re))
accuracy	0	(cos.f64 re)
accuracy	0.1171875	(*.f64 (neg.f64 (cos.f64 re)) im)
accuracy	30.15324976288508	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
accuracy	0.05859375	(fma.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.05859375	(.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.078125	(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
accuracy	5.166149745682956	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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

99.0ms	129×	0	valid
88.0ms	55×	2	valid
62.0ms	72×	1	valid

Compiler

Compiled 585 to 84 computations (85.6% saved)

Precisions

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

ival-mult: 96.0ms (47% of total)

ival-exp: 37.0ms (18.1% of total)

ival-cos: 15.0ms (7.3% of total)

adjust: 14.0ms (6.9% of total)

const: 13.0ms (6.4% of total)

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

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

ival-neg: 5.0ms (2.4% of total)

ival-div: 3.0ms (1.5% of total)

exact: 1.0ms (0.5% of total)

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

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

series41.0ms (0.4%)

Memory

24.6MiB live, 96.6MiB allocated

Counts

23 → 372

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

Calls

6 calls:

Time	Variable		Point	Expression
8.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))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (neg (exp im)) 1/2) (neg (exp im)) (exp im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (neg im)) (exp im)) (/ (* (cos re) 1/2) (exp im)))
4.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))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (neg (exp im)) 1/2) (neg (exp im)) (exp im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (neg im)) (exp im)) (/ (* (cos re) 1/2) (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))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (neg (exp im)) 1/2) (neg (exp im)) (exp im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (neg im)) (exp im)) (/ (* (cos re) 1/2) (exp im)))
3.0ms	re	@	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))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (neg (exp im)) 1/2) (neg (exp im)) (exp im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (neg im)) (exp im)) (/ (* (cos re) 1/2) (exp im)))
3.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))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (neg (exp im)) 1/2) (neg (exp im)) (exp im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (neg im)) (exp im)) (/ (* (cos re) 1/2) (exp im)))

simplify496.0ms (4.3%)

Memory

-10.6MiB live, 302.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	330	3931
1	1009	3658
2	3360	3541
0	8199	3365

Stop Event

1×	iter limit
1×	node limit

Counts

372 → 372

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

rewrite210.0ms (1.8%)

Memory

-16.5MiB live, 271.9MiB allocated

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	46	256
0	79	250
1	280	245
2	1778	245
0	8545	245

Stop Event

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

Counts

23 → 507

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

eval281.0ms (2.5%)

Memory: 33.3MiB live, 309.6MiB allocated
Compiler: Compiled 22 786 to 2 644 computations (88.4% saved)

prune54.0ms (0.5%)

Memory

-14.5MiB live, 97.7MiB allocated

Pruning

22 alts after pruning (21 fresh and 1 done)

	Pruned	Kept	Total
New	962	19	981
Fresh	2	2	4
Picked	4	1	5
Done	0	0	0
Total	968	22	990

Accuracy

100.0%

Counts

990 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.1%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 (neg.f64 im))))
	53.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	91.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (+.f64 (.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)))
▶	91.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	57.2%	(.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)))
	57.0%	(.f64 #s(approx ( 1/2 (cos 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)))
	55.0%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #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)))
▶	3.6%	#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))
	2.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 (-.f64 (pow.f64 (exp.f64 im) #s(literal -2 binary64)) (pow.f64 (exp.f64 im) #s(literal 2 binary64))) (-.f64 (exp.f64 (neg.f64 im)) (neg.f64 (exp.f64 im))))))
▶	56.2%	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))
	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) (.f64 #s(literal 0 binary64) (cos.f64 re))))) im))
	39.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) (*.f64 #s(literal 0 binary64) (cos.f64 re)))))) im))
▶	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
▶	84.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
✓	52.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	38.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (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))) im))
	35.8%	#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))
	36.5%	#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))
	59.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))
	35.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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))))
	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 748 to 550 computations (26.5% saved)

simplify115.0ms (1%)

Memory

-0.8MiB live, 104.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

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

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	59	392
0	91	373
1	167	363
2	379	363
3	1040	345
4	1890	345
5	4036	345
6	5974	345
0	8089	345

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

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

localize366.0ms (3.2%)

Memory

7.4MiB live, 476.1MiB allocated

Localize:

Found 17 expressions of interest:

New	Metric	Score
accuracy	0.12109375	(/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))
accuracy	0.1953125	(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re))))
accuracy	0.27181625976844204	(pow.f64 (cos.f64 re) #s(literal 2 binary64))
accuracy	30.15324976288508	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
accuracy	0.05859375	(fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))
accuracy	0.1171875	(*.f64 (cos.f64 re) im)
accuracy	0.3046875	(*.f64 #s(literal -1/6 binary64) im)
accuracy	9.586192607918049	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
accuracy	0.10546875	(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy	3.5902933415735707	(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	9.584903181795067	#s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))
accuracy	23.82501668979518	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))
accuracy	61.703561779166144	#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))
accuracy	0.05859375	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.078125	(fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64))
accuracy	0.078125	(.f64 (fma.f64 (.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) im)
accuracy	5.166149745682956	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))

Samples

163.0ms	55×	2	valid
83.0ms	129×	0	valid
71.0ms	72×	1	valid

Compiler

Compiled 609 to 101 computations (83.4% saved)

Precisions

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

ival-mult: 69.0ms (24.7% of total)

ival-cos: 66.0ms (23.7% of total)

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

ival-add: 20.0ms (7.2% of total)

adjust: 19.0ms (6.8% of total)

ival-pow2: 18.0ms (6.5% of total)

const: 16.0ms (5.7% of total)

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

ival-div: 6.0ms (2.2% of total)

ival-neg: 3.0ms (1.1% of total)

exact: 1.0ms (0.4% of total)

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

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

series35.0ms (0.3%)

Memory

-11.1MiB live, 60.5MiB allocated

Counts

23 → 360

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

Calls

6 calls:

Time	Variable		Point	Expression
7.0ms	re	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (cos re) im) (+ (* (* -1/6 im) im) -1) (* (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (+ 0 (cos re)) (- 0 (pow (cos re) 2)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* im im) -1/2520) -1/60) im) (+ (* (* im im) -1/2520) -1/60) (- (exp (neg im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* -1/6 im) (pow (cos re) 2) (/ 1 (+ 0 (cos re))))
3.0ms	im	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (cos re) im) (+ (* (* -1/6 im) im) -1) (* (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (+ 0 (cos re)) (- 0 (pow (cos re) 2)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* im im) -1/2520) -1/60) im) (+ (* (* im im) -1/2520) -1/60) (- (exp (neg im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* -1/6 im) (pow (cos re) 2) (/ 1 (+ 0 (cos re))))
3.0ms	im	@	-inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (cos re) im) (+ (* (* -1/6 im) im) -1) (* (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (+ 0 (cos re)) (- 0 (pow (cos re) 2)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* im im) -1/2520) -1/60) im) (+ (* (* im im) -1/2520) -1/60) (- (exp (neg im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* -1/6 im) (pow (cos re) 2) (/ 1 (+ 0 (cos re))))
3.0ms	re	@	inf	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (cos re) im) (+ (* (* -1/6 im) im) -1) (* (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (+ 0 (cos re)) (- 0 (pow (cos re) 2)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* im im) -1/2520) -1/60) im) (+ (* (* im im) -1/2520) -1/60) (- (exp (neg im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* -1/6 im) (pow (cos re) 2) (/ 1 (+ 0 (cos re))))
2.0ms	im	@	0	((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (+ (* (* re re) -1/4) 1/2) (* re re) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (cos re) im) (+ (* (* -1/6 im) im) -1) (* (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (+ 0 (cos re)) (- 0 (pow (cos re) 2)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (+ (* (* im im) -1/2520) -1/60) im) (+ (* (* im im) -1/2520) -1/60) (- (exp (neg im)) (exp im)) (+ (* -1/3 (* im im)) -2) (* -1/6 im) (pow (cos re) 2) (/ 1 (+ 0 (cos re))))

simplify219.0ms (1.9%)

Memory

7.0MiB live, 315.1MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	305	3631
1	924	3360
2	3102	3254
3	7657	3254
0	8237	3079

Stop Event

1×	iter limit
1×	node limit

Counts

360 → 359

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

rewrite165.0ms (1.4%)

Memory

21.8MiB live, 339.4MiB allocated

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	59	280
0	91	260
1	340	245
2	2384	245
0	8373	245

Stop Event

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

Counts

23 → 964

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

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>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval613.0ms (5.3%)

Memory: -11.5MiB live, 436.8MiB allocated
Compiler: Compiled 43 343 to 6 505 computations (85% saved)

prune156.0ms (1.4%)

Memory

1.8MiB live, 128.9MiB allocated

Pruning

34 alts after pruning (31 fresh and 3 done)

	Pruned	Kept	Total
New	1 812	21	1 833
Fresh	6	10	16
Picked	3	2	5
Done	0	1	1
Total	1 821	34	1 855

Accuracy

100.0%

Counts

1 855 → 34

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.1%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 (neg.f64 im))))
▶	53.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	91.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (+.f64 (.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)))
▶	91.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
▶	57.2%	(.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)))
	57.0%	(.f64 #s(approx ( 1/2 (cos 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)))
	57.0%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	55.0%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #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)))
✓	3.6%	#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))
	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 #s(literal -1/4 binary64) (*.f64 re re)))))
	2.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 (-.f64 (pow.f64 (exp.f64 im) #s(literal -2 binary64)) (pow.f64 (exp.f64 im) #s(literal 2 binary64))) (-.f64 (exp.f64 (neg.f64 im)) (neg.f64 (exp.f64 im))))))
▶	56.2%	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))))
	33.7%	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 #s(approx (+ ( -1/3 (* im im)) -2) (.f64 (.f64 im im) #s(literal -1/3 binary64))) im))))
	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) im))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) im) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) im) (neg.f64 (cos.f64 re))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 6 binary64))) (pow.f64 (cos.f64 re) #s(literal 5 binary64))) im))
	39.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
	60.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (pow.f64 (sqrt.f64 (cos.f64 re)) #s(literal 2 binary64)) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (pow.f64 (cos.f64 re) #s(literal -1 binary64))) (/.f64 im (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 im (cos.f64 re))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 re) #s(literal -1 binary64))) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 re re))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
✓	84.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	51.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
✓	52.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	46.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #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 (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
	51.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))
	38.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (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))) im))
	35.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (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))
	36.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
	59.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 im im) #s(literal -1/3 binary64) #s(literal -2 binary64)))) im)))
	35.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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))))
▶	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 1 164 to 878 computations (24.6% saved)

simplify192.0ms (1.7%)

Memory

-8.7MiB live, 69.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 19 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	(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
cost-diff	0	(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))
cost-diff	0	#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)))
cost-diff	0	(.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)))
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	(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)))
cost-diff	0	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))))
cost-diff	0	(neg.f64 im)
cost-diff	0	#s(approx (* (neg (cos re)) im) (neg.f64 im))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
cost-diff	0	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) 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 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) 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	58	472
0	100	466
1	175	466
2	282	466
3	541	466
4	978	466
5	1774	466
6	2367	466
7	2651	466
8	2854	466
9	2968	466
10	3017	466
11	3148	466
12	3498	466
13	3795	466
14	5780	466
15	7776	466
0	8152	466

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

localize316.0ms (2.8%)

Memory

-12.8MiB live, 78.3MiB allocated

Localize:

Found 19 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	0	(cos.f64 re)
accuracy	0.05859375	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
accuracy	30.015459521697196	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0.078125	(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
accuracy	0.1015625	(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
accuracy	5.166149745682956	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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	31.919744442580672	#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)))
accuracy	0.3046875	(*.f64 #s(literal -1/3 binary64) im)
accuracy	3.5902933415735707	(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)))
accuracy	9.584903181795067	#s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))
accuracy	23.82501668979518	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))))
accuracy	0	(neg.f64 im)
accuracy	29.427253796611787	#s(approx (* (neg (cos re)) im) (neg.f64 im))
accuracy	30.15324976288508	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
accuracy	0.05859375	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.0703125	(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
accuracy	0.078125	(.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im)
accuracy	5.166149745682956	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))

Samples

135.0ms	73×	1	valid
73.0ms	54×	2	valid
52.0ms	129×	0	valid

Compiler

Compiled 731 to 100 computations (86.3% saved)

Precisions

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

ival-mult: 47.0ms (29.1% of total)

ival-exp: 37.0ms (22.9% of total)

ival-add: 29.0ms (17.9% of total)

const: 17.0ms (10.5% of total)

adjust: 16.0ms (9.9% of total)

ival-cos: 7.0ms (4.3% of total)

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

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

exact: 1.0ms (0.6% of total)

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

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

series26.0ms (0.2%)

Memory

15.9MiB live, 15.9MiB allocated

Counts

25 → 384

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

simplify228.0ms (2%)

Memory

15.1MiB live, 90.1MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	208	3769
1	603	3445
2	1980	3397
3	5058	3354
4	7358	3354
0	8112	3164

Stop Event

1×	iter limit
1×	node limit

Counts

384 → 384

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

rewrite321.0ms (2.8%)

Memory

-0.4MiB live, 279.3MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	322
0	100	316
1	344	316
2	1670	316
0	8525	316

Stop Event

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

Counts

25 → 405

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

eval127.0ms (1.1%)

Memory: -22.3MiB live, 289.1MiB allocated
Compiler: Compiled 22 805 to 2 380 computations (89.6% saved)

prune99.0ms (0.9%)

Memory

-1.5MiB live, 239.4MiB allocated

Pruning

40 alts after pruning (35 fresh and 5 done)

	Pruned	Kept	Total
New	873	13	886
Fresh	4	22	26
Picked	3	2	5
Done	0	3	3
Total	880	40	920

Accuracy

100.0%

Counts

920 → 40

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.1%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 (neg.f64 im))))
✓	53.1%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	52.0%	(.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	40.4%	(.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 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal -1/60 binary64) (.f64 (.f64 im im) #s(literal -1/2520 binary64))) (-.f64 #s(literal 1/3600 binary64) (.f64 #s(literal 1/6350400 binary64) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	57.2%	(.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 (+.f64 (.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)))
	57.1%	(.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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	57.2%	(.f64 #s(approx ( 1/2 (cos re)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (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)))
	57.0%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) #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.0%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	55.0%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #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)))
✓	3.6%	#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))
	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)) #s(literal 1/2 binary64) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)) (.f64 #s(literal -1/4 binary64) (*.f64 re re)))))
	56.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 re re) #s(literal 1/2 binary64)))))
	2.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 (-.f64 (pow.f64 (exp.f64 im) #s(literal -2 binary64)) (pow.f64 (exp.f64 im) #s(literal 2 binary64))) (-.f64 (exp.f64 (neg.f64 im)) (neg.f64 (exp.f64 im))))))
	33.7%	#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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 #s(approx (+ ( -1/3 (* im im)) -2) (.f64 (.f64 im im) #s(literal -1/3 binary64))) im))))
	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (pow.f64 (neg.f64 (cos.f64 re)) #s(literal 3 binary64)) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) im))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64)) im) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) im) (neg.f64 (cos.f64 re))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	52.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 6 binary64))) (pow.f64 (cos.f64 re) #s(literal 5 binary64))) im))
	39.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
	60.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (pow.f64 (sqrt.f64 (cos.f64 re)) #s(literal 2 binary64)) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (pow.f64 (cos.f64 re) #s(literal -1 binary64))) (/.f64 im (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 im (cos.f64 re))) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	84.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 re) #s(literal -1 binary64))) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	52.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 re re))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
✓	84.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	51.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
✓	52.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	46.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #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 (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
	14.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))))
	51.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))
	38.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (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))) im))
	35.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (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))
	36.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
	59.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 (*.f64 im im) #s(literal -1/3 binary64) #s(literal -2 binary64)))) im)))
	35.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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))))
	33.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (*.f64 (neg.f64 im) im) im)))
	28.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
✓	28.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
	38.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (log.f64 (exp.f64 (neg.f64 im)))))

Compiler

Compiled 1 883 to 845 computations (55.1% saved)

regimes140.0ms (1.2%)

Memory

17.5MiB live, 342.9MiB allocated

Counts

63 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

27.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
25.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
24.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
21.0ms	re
19.0ms	im

Results

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

regimes33.0ms (0.3%)

Memory

-22.5MiB live, 94.6MiB allocated

Counts

55 → 2

Calls

Call 1

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

Calls

2 calls:

16.0ms	im
13.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))

Results

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

Compiler

Compiled 8 to 9 computations (-12.5% saved)

regimes29.0ms (0.3%)

Memory

-4.2MiB live, 78.5MiB allocated

Counts

48 → 2

Calls

Call 1

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

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

Compiler

Compiled 8 to 9 computations (-12.5% saved)

regimes36.0ms (0.3%)

Memory

16.4MiB live, 94.2MiB allocated

Counts

43 → 3

Calls

Call 1

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

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

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 20 to 20 computations (0% saved)

regimes14.0ms (0.1%)

Memory

-10.1MiB live, 30.7MiB allocated

Counts

42 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

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

regimes24.0ms (0.2%)

Memory

19.6MiB live, 58.6MiB allocated

Counts

41 → 3

Calls

Call 1

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 13 to 13 computations (0% saved)

regimes12.0ms (0.1%)

Memory

-6.2MiB live, 33.0MiB allocated

Counts

38 → 2

Calls

Call 1

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

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

regimes11.0ms (0.1%)

Memory

-7.5MiB live, 31.8MiB allocated

Counts

34 → 2

Calls

Call 1

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes11.0ms (0.1%)

Memory

-13.1MiB live, 29.5MiB allocated

Counts

33 → 3

Calls

Call 1

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

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

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

Calls

1 calls:

8.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes10.0ms (0.1%)

Memory

28.0MiB live, 28.0MiB allocated

Counts

31 → 3

Calls

Call 1

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

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

#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (+ (* (* re re) -1/4) 1/2) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (*.f64 #s(literal -1/3 binary64) 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
95.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 12 to 11 computations (8.3% saved)

regimes53.0ms (0.5%)

Memory

12.6MiB live, 130.9MiB allocated

Counts

30 → 3

Calls

Call 1

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

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

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

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

Calls

6 calls:

10.0ms	im
9.0ms	(cos.f64 re)
9.0ms	re
8.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
70.1%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
70.1%	2	`(cos.f64 re)`
61.1%	2	`re`
63.1%	3	`im`
61.2%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
71.8%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes27.0ms (0.2%)

Memory

-29.7MiB live, 50.7MiB allocated

Counts

26 → 2

Calls

Call 1

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

Outputs

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

Calls

3 calls:

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

Results

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

regimes19.0ms (0.2%)

Memory

12.1MiB live, 50.6MiB allocated

Counts

18 → 2

Calls

Call 1

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

Outputs

#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)) #s(approx (- (exp (neg 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)) #s(literal 1/2 binary64)) #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)))

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes17.0ms (0.2%)

Memory

-0.3MiB live, 38.2MiB allocated

Counts

15 → 3

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes13.0ms (0.1%)

Memory

-17.4MiB live, 25.1MiB allocated

Counts

13 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes12.0ms (0.1%)

Memory

30.8MiB live, 30.8MiB allocated

Counts

11 → 3

Calls

Call 1

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

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 (* (neg (cos re)) 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))))

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

Calls

3 calls:

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes10.0ms (0.1%)

Memory

-17.1MiB live, 21.6MiB allocated

Counts

10 → 3

Calls

Call 1

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes7.0ms (0.1%)

Memory

18.9MiB live, 18.9MiB allocated

Counts

8 → 2

Calls

Call 1

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes16.0ms (0.1%)

Memory

-0.5MiB live, 38.5MiB allocated

Counts

5 → 3

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
39.4%	2	`re`
44.2%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
48.4%	3	`im`
54.5%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
43.3%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
43.3%	2	`(cos.f64 re)`

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes15.0ms (0.1%)

Memory

-5.0MiB live, 34.2MiB allocated

Counts

4 → 2

Calls

Call 1

Inputs
#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 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))) (.f64 #s(approx ( (- 0 (pow (cos re) 2)) (/ 1 (+ 0 (cos re)))) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #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 (* (neg (cos re)) im) (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
36.5%	1	`re`
38.9%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
38.9%	2	`(cos.f64 re)`
38.3%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
38.3%	2	`im`
38.8%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes12.0ms (0.1%)

Memory

-16.7MiB live, 26.1MiB allocated

Counts

2 → 1

Calls

Call 1

Inputs

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

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes8.0ms (0.1%)

Memory

22.7MiB live, 22.7MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
3.6%	1	`re`
3.6%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
3.6%	1	`(cos.f64 re)`
3.6%	1	`im`
3.6%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
3.6%	1	`(-.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.9MiB live, 1.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.38277743911168316	-8.749704073307552e-5

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	-0.38277743911168316	-8.749704073307552e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch3.0ms (0%)

Memory

-37.4MiB live, 1.8MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-9.328509637731025e+99	-39.45738644059993

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	1.93794999173029e-5	+inf
0.0ms	-0.19138871955584158	-4.374852036653776e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.7MiB live, 1.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.93794999173029e-5	+inf
0.0ms	-inf	-1.961116279416144e+99

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	1.93794999173029e-5	+inf
0.0ms	-inf	-1.961116279416144e+99

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	-inf	-1.961116279416144e+99

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	-inf	-1.961116279416144e+99

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.93794999173029e-5	+inf
0.0ms	-0.19138871955584158	-4.374852036653776e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.7MiB live, 1.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.93794999173029e-5	+inf
0.0ms	-4.374852036653776e-5	0.0

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	1.8864039290076357e-14
0.0ms	-inf	-1.961116279416144e+99

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.011288107647282735	0.002174233919321751

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.011288107647282735	0.002174233919321751

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.9256520693858149	0.9278621115082774
0.0ms	-0.011288107647282735	0.002174233919321751

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.9256520693858149	0.9278621115082774
0.0ms	-0.011288107647282735	0.002174233919321751

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.9256520693858149	0.9278621115082774
0.0ms	-0.011288107647282735	0.002174233919321751

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.9256520693858149	0.9278621115082774
0.0ms	-0.011288107647282735	0.002174233919321751

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	-0.011288107647282735	0.002174233919321751

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.8864039290076357e-14
0.0ms	-inf	-1.961116279416144e+99

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.011288107647282735	0.002174233919321751

Compiler

Compiled 15 to 16 computations (-6.7% saved)

simplify43.0ms (0.4%)

Memory

-15.6MiB live, 104.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	204	2042
1	268	2042
2	290	2042
3	305	2042
4	312	2042
5	314	2042

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/18014398509481984 binary64)) (fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 (neg.f64 im)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))))
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/18014398509481984 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 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))))
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -5000000000000000079514455548799590234180404281972640694890663778873919386085190530406734992928407552 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 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -3602879701896397/36028797018963968 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))) (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 5902958103587057/295147905179352825856 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (log.f64 (exp.f64 (neg.f64 im))))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5902958103587057/295147905179352825856 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) 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 (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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 5902958103587057/295147905179352825856 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) 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 (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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 #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 -3602879701896397/36028797018963968 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 5902958103587057/295147905179352825856 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) 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 -5902958103587057/147573952589676412928 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 5902958103587057/295147905179352825856 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 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) 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 -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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)) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 #s(approx (+ ( -1/3 (* im im)) -2) (.f64 (.f64 im im) #s(literal -1/3 binary64))) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #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)) #s(approx (- (exp (neg 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)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #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)) #s(approx (- (exp (neg 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)) #s(literal 1/2 binary64)) #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))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)))) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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)) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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)) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #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 (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (.f64 (neg.f64 im) im) 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 (* (neg (cos re)) im) (neg.f64 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))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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 (* (neg (cos re)) im) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))

Outputs
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/18014398509481984 binary64)) (fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 (neg.f64 im)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))))
(if (<=.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -3602879701896397/18014398509481984 binary64)) (fma.f64 (.f64 (neg.f64 #s(literal 1/2 binary64)) (exp.f64 im)) (cos.f64 re) (.f64 (exp.f64 (neg.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (*.f64 (cos.f64 re) im))))
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/18014398509481984 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 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))))
(if (<=.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -3602879701896397/18014398509481984 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 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (*.f64 (cos.f64 re) im))))
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -5000000000000000079514455548799590234180404281972640694890663778873919386085190530406734992928407552 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 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -5000000000000000079514455548799590234180404281972640694890663778873919386085190530406734992928407552 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 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 (cos.f64 re) #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 -3602879701896397/36028797018963968 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))) (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 5902958103587057/295147905179352825856 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -3602879701896397/36028797018963968 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))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (.f64 (cos.f64 re) im))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/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 -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (log.f64 (exp.f64 (neg.f64 im))))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5902958103587057/295147905179352825856 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) 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 (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (log.f64 (exp.f64 (neg.f64 im))))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/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 -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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 5902958103587057/295147905179352825856 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) 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 (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)))) im)))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -inf.0 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) (.f64 (.f64 im im) #s(literal -1/2520 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 (fma.f64 #s(literal 1/48 binary64) (.f64 re re) #s(literal -1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/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 -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -inf.0 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) (.f64 (.f64 im im) #s(literal -1/2520 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 (fma.f64 #s(literal 1/48 binary64) (.f64 re re) #s(literal -1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 (cos.f64 re) #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 -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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 #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 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -inf.0 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) (.f64 (.f64 im im) #s(literal -1/2520 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 (fma.f64 #s(literal 1/48 binary64) (.f64 re re) #s(literal -1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))) (.f64 #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 (cos.f64 re) #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 -3602879701896397/36028797018963968 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 5902958103587057/295147905179352825856 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -3602879701896397/36028797018963968 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)) #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)))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 5902958103587057/295147905179352825856 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) (.f64 (cos.f64 re) im))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 #s(literal -1/4 binary64) (.f64 re 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 -5902958103587057/147573952589676412928 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 5902958103587057/295147905179352825856 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 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im))))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -5902958103587057/147573952589676412928 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)) #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)))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 5902958103587057/295147905179352825856 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 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 #s(literal -1/4 binary64) (.f64 re 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 -inf.0 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 #s(approx (+ ( -1/2520 (* im im)) -1/60) (.f64 #s(literal -1/2520 binary64) (.f64 im im))) (.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)) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 #s(approx (+ ( -1/3 (* im im)) -2) (.f64 (.f64 im im) #s(literal -1/3 binary64))) im))))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -inf.0 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/2520 (* im im)) -1/60) (.f64 (.f64 im im) #s(literal -1/2520 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 (fma.f64 #s(literal 1/48 binary64) (.f64 re re) #s(literal -1/4 binary64)) (.f64 re re) #s(literal 1/2 binary64)))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 0 binary64)) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 #s(approx (+ (* -1/3 (* im im)) -2) (.f64 (.f64 im im) #s(literal -1/3 binary64))) im)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #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)) #s(approx (- (exp (neg 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)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #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)) #s(approx (- (exp (neg 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)) #s(literal 1/2 binary64)) #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))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (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))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #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)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) im) re) re (neg.f64 im)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)))) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 #s(literal -1/3 binary64) im) im #s(literal -2 binary64)) im)) #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 #s(literal -1/4 binary64) (.f64 re re))))) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) im) re) re (neg.f64 im)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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)) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) 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)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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)) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 (fma.f64 #s(literal -1/24 binary64) (.f64 re re) #s(literal 1/2 binary64)) im) re) re (neg.f64 im)))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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)) (if (<=.f64 (cos.f64 re) #s(literal 8340666509890159/9007199254740992 binary64)) #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 (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (.f64 (neg.f64 im) im) 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 (* (neg (cos re)) im) (neg.f64 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))))
(if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (.f64 (neg.f64 im) im) im))) (if (<=.f64 (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #s(literal 0 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 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))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/576460752303423488 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 (* (neg (cos re)) im) (neg.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (+ (* (* (neg (exp im)) 1/2) (cos re)) (/ (* (cos re) 1/2) (exp im))) #s(literal 0 binary64))

soundness2.0s (17.1%)

Memory

19.7MiB live, 1 769.8MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	208	3769
1	603	3445
2	1980	3397
3	5058	3354
4	7358	3354
0	8112	3164
0	11	30
0	18	27
1	54	27
2	351	27
0	4157	27
0	58	322
0	100	316
1	344	316
2	1670	316
0	8525	316
0	305	3631
1	924	3360
2	3102	3254
3	7657	3254
0	8237	3079
0	59	280
0	91	260
1	340	245
2	2384	245
0	8373	245
0	46	256
0	79	250
1	280	245
2	1778	245
0	8545	245
0	330	3931
1	1009	3658
2	3360	3541
0	8199	3365
0	126	650
1	321	616
2	909	610
3	2943	589
4	6409	589
0	8371	556

Stop Event

1×	fuel
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×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	iter limit
1×	iter limit
1×	node limit
1×	iter limit
1×	iter limit
1×	node limit

Compiler

Compiled 2 374 to 1 112 computations (53.2% saved)

preprocess309.0ms (2.7%)

Memory: 6.0MiB live, 358.9MiB allocated
Remove: (abs re)
Compiler: Compiled 2 742 to 562 computations (79.5% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated