Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory

0.5MiB live, 0.5MiB 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 (26.6%)

Memory

-151.4MiB live, 3 265.6MiB allocated

Samples

1.5s	3 171×	1	valid
757.0ms	5 085×	0	valid

Precisions

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

ival-exp: 829.0ms (43.9% of total)

adjust: 356.0ms (18.9% of total)

ival-cos: 305.0ms (16.2% of total)

ival-mult: 203.0ms (10.8% of total)

ival-sub: 171.0ms (9.1% of total)

exact: 11.0ms (0.6% of total)

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

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

Bogosity

explain174.0ms (1.8%)

Memory

-11.6MiB live, 471.2MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
127	-	1	(1.1845931388576226e+305 0.012918772972173599)	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
0	-	0	-	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
0	-	0	-	`(exp.f64 im)`
0	-	0	-	`#s(literal 0 binary64)`
0	-	0	-	`(cos.f64 re)`
0	-	0	-	`im`
0	-	0	-	`(-.f64 #s(literal 0 binary64) im)`
0	-	0	-	`re`
0	-	0	-	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
0	-	0	-	`#s(literal 1/2 binary64)`
0	-	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	126	1

Confusion

	Predicted +	Predicted -
+	126	1
-	0	129

Precision

1.0

Recall

0.9921259842519685

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	126	1	0
-	0	0	129

Precision?

1.0

Recall?

1.0

Freqs

test

number	freq
0	130
1	126

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

62.0ms	202×	1	valid
34.0ms	310×	0	valid

Compiler

Compiled 130 to 48 computations (63.1% saved)

Precisions

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

ival-exp: 36.0ms (49.8% of total)

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

ival-mult: 10.0ms (13.8% of total)

ival-sub: 6.0ms (8.3% of total)

adjust: 5.0ms (6.9% of total)

exact: 1.0ms (1.4% of total)

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

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

preprocess131.0ms (1.4%)

Memory

32.5MiB live, 111.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.5MiB live, 0.5MiB allocated
Compiler: Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	54.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)

simplify50.0ms (0.5%)

Memory

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

localize62.0ms (0.6%)

Memory

-1.0MiB live, 159.6MiB allocated

Localize:

Found 4 expressions of interest:

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

Samples

31.0ms	101×	1	valid
17.0ms	155×	0	valid

Compiler

Compiled 78 to 24 computations (69.2% saved)

Precisions

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

ival-exp: 18.0ms (53% of total)

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

ival-mult: 4.0ms (11.8% of total)

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

adjust: 2.0ms (5.9% 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

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

simplify166.0ms (1.7%)

Memory

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

rewrite91.0ms (0.9%)

Memory

0.8MiB live, 161.7MiB 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>

eval63.0ms (0.7%)

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

prune11.0ms (0.1%)

Memory

-0.0MiB live, 38.8MiB allocated

Pruning

7 alts after pruning (7 fresh and 0 done)

	Pruned	Kept	Total
New	283	7	290
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	284	7	291

Accuracy

99.9%

Counts

291 → 7

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.6%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (fma.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3/2 binary64))) (/.f64 (exp.f64 (.f64 (neg.f64 im) #s(literal 3/2 binary64))) (fma.f64 (exp.f64 im) (exp.f64 im) (+.f64 (pow.f64 (exp.f64 im) #s(literal -2 binary64)) #s(literal 1 binary64)))) (neg.f64 (/.f64 (pow.f64 (exp.f64 im) #s(literal 3 binary64)) (fma.f64 (exp.f64 im) (exp.f64 im) (+.f64 (pow.f64 (exp.f64 im) #s(literal -2 binary64)) #s(literal 1 binary64)))))))
▶	95.4%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
▶	91.6%	(.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)))
▶	86.8%	(.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.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)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
▶	39.8%	#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.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 262 to 182 computations (30.5% saved)

simplify220.0ms (2.3%)

Memory

-31.1MiB live, 167.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	42	355
0	70	347
1	129	347
2	247	347
3	503	347
4	940	347
5	1565	347
6	2107	347
7	2392	347
8	2597	347
9	2721	347
10	2806	347
11	3076	347
12	3284	347
13	3606	347
14	5285	347
15	7082	347
16	7439	347
17	7453	347
18	7453	347
19	7839	347
0	8006	347

Stop Event

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

Calls

Call 1

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

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

localize197.0ms (2%)

Memory

4.2MiB live, 526.3MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 (neg.f64 im))
accuracy	0	(exp.f64 im)
accuracy	24.854389309751443	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
accuracy	29.306533354876773	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0.03515625	(.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.08984375	(.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.2676306988978234	(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
accuracy	5.315249797181508	#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.05078125	(.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)
accuracy	0.08984375	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.1015625	(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy	8.351532064396267	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))
accuracy	0	(neg.f64 (cos.f64 re))
accuracy	0	(cos.f64 re)
accuracy	0.16796875	(*.f64 (neg.f64 (cos.f64 re)) im)
accuracy	30.643049723379665	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
accuracy	0.03515625	(fma.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.08984375	(.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.44514220612269373	(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
accuracy	2.874014940837042	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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

104.0ms	101×	1	valid
56.0ms	155×	0	valid

Compiler

Compiled 563 to 73 computations (87% saved)

Precisions

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

ival-exp: 33.0ms (26.8% of total)

ival-mult: 29.0ms (23.6% of total)

const: 28.0ms (22.8% of total)

ival-add: 10.0ms (8.1% of total)

ival-cos: 8.0ms (6.5% of total)

adjust: 7.0ms (5.7% of total)

ival-sub: 4.0ms (3.3% of total)

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

exact: 1.0ms (0.8% of total)

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

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

series26.0ms (0.3%)

Memory

24.7MiB live, 63.0MiB allocated

Counts

22 → 336

Calls

Call 1

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

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

simplify175.0ms (1.8%)

Memory

1.4MiB live, 319.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	206	3253
1	579	3079
2	1843	3042
3	4230	2988
0	8496	2830

Stop Event

1×	iter limit
1×	node limit

Counts

336 → 336

Calls

Call 1

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

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

rewrite167.0ms (1.7%)

Memory

1.3MiB live, 280.0MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	42	257
0	70	249
1	240	249
2	1421	249
0	8469	249

Stop Event

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

Counts

22 → 370

Calls

Call 1

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

eval108.0ms (1.1%)

Memory: -0.6MiB live, 229.3MiB allocated
Compiler: Compiled 16 914 to 2 295 computations (86.4% saved)

prune42.0ms (0.4%)

Memory

-14.3MiB live, 111.1MiB allocated

Pruning

25 alts after pruning (21 fresh and 4 done)

	Pruned	Kept	Total
New	761	21	782
Fresh	2	0	2
Picked	1	4	5
Done	0	0	0
Total	764	25	789

Accuracy

99.9%

Counts

789 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	95.4%	(.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)))
✓	86.8%	(.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)))
	55.5%	(.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)))
▶	49.7%	(.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 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
	50.3%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
	57.8%	(.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.5%	(.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)))
	50.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
▶	95.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (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)))
	52.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im (cos.f64 re)) (.f64 im (cos.f64 re)))) (+.f64 #s(literal 0 binary64) (.f64 im (cos.f64 re)))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 re) (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) im))
✓	39.8%	#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)))
	38.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64)))) im))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 re))) im))
▶	91.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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))
	86.5%	#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.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
▶	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
	35.7%	#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))
	34.6%	#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))
	32.9%	#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))
	34.6%	#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))))
▶	26.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 723 to 549 computations (24.1% saved)

simplify187.0ms (1.9%)

Memory

29.9MiB live, 266.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 19 expressions of interest:

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

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	59	457
0	95	451
1	187	451
2	441	445
3	1205	443
4	2818	443
5	5627	443
0	8115	443

Stop Event

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

Calls

Call 1

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

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

localize244.0ms (2.5%)

Memory

-26.8MiB live, 369.3MiB allocated

Localize:

Found 19 expressions of interest:

New	Metric	Score
accuracy	0.03125	(fma.f64 (.f64 im im) (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))
accuracy	0.1171875	(.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)
accuracy	0.2693230753464332	(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
accuracy	5.3151427019742075	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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))
accuracy	0.09375	(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
accuracy	0.1015625	(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy	8.351532064396267	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))
accuracy	34.41579819028602	#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.0703125	(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
accuracy	0.0703125	(*.f64 #s(literal -1/60 binary64) im)
accuracy	5.315249797181508	#s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy	24.854389309751443	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
accuracy	0	(neg.f64 im)
accuracy	30.643049723379665	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
accuracy	31.086228031863506	#s(approx (* (neg (cos re)) im) (neg.f64 im))
accuracy	0.12109375	(.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)))
accuracy	0.16796875	(*.f64 (neg.f64 (cos.f64 re)) im)
accuracy	0.45847878842038225	(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
accuracy	2.8742954371325906	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (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)))

Samples

118.0ms	101×	1	valid
83.0ms	155×	0	valid

Compiler

Compiled 697 to 104 computations (85.1% saved)

Precisions

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

ival-mult: 53.0ms (33.6% of total)

ival-exp: 29.0ms (18.4% of total)

const: 27.0ms (17.1% of total)

ival-add: 15.0ms (9.5% of total)

adjust: 12.0ms (7.6% of total)

ival-cos: 10.0ms (6.3% of total)

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

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

ival-pow: 2.0ms (1.3% of total)

exact: 1.0ms (0.6% of total)

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

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

series47.0ms (0.5%)

Memory

36.7MiB live, 74.7MiB allocated

Counts

27 → 456

Calls

Call 1

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

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

Calls

6 calls:

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

simplify323.0ms (3.4%)

Memory

-22.9MiB live, 378.0MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	346	5630
1	1051	5377
2	3724	5092
3	7426	5086
0	8171	4766

Stop Event

1×	iter limit
1×	node limit

Counts

456 → 456

Calls

Call 1

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

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

rewrite205.0ms (2.1%)

Memory

4.8MiB live, 192.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	59	383
0	95	377
1	360	377
2	2418	377
0	8243	377

Stop Event

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

Counts

27 → 410

Calls

Call 1

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

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>

eval166.0ms (1.7%)

Memory: 10.5MiB live, 209.3MiB allocated
Compiler: Compiled 21 928 to 2 575 computations (88.3% saved)

prune54.0ms (0.6%)

Memory

-22.1MiB live, 106.8MiB allocated

Pruning

29 alts after pruning (23 fresh and 6 done)

	Pruned	Kept	Total
New	881	11	892
Fresh	4	12	16
Picked	3	2	5
Done	0	4	4
Total	888	29	917

Accuracy

99.9%

Counts

917 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	95.4%	(.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)))
✓	86.8%	(.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)))
	55.5%	(.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)))
	29.8%	(.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 #s(approx (+ ( -1/3 (* im im)) -2) (.f64 #s(literal -1/3 binary64) (.f64 im im))) im)))
	50.3%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
	50.9%	(.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 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
	57.8%	(.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)))
	52.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im (cos.f64 re)) (.f64 im (cos.f64 re)))) (+.f64 #s(literal 0 binary64) (.f64 im (cos.f64 re)))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 re) (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) im))
✓	39.8%	#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)))
▶	38.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64)))) im))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 re))) im))
✓	91.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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))
▶	86.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im))
✓	52.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
▶	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
	55.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(approx (+ (* (* -1/60 im) im) -1/3) (.f64 (.f64 #s(literal -1/60 binary64) im) im)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
▶	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
	35.7%	#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))
	34.6%	#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))
	32.9%	#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))
	57.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (pow im 3) (* (cos re) (+ (* (* im im) (+ (* -1/5040 (* im im)) -1/120)) -1/6))) (* (neg (cos re)) im)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (pow.f64 im #s(literal 3 binary64)) (neg.f64 im))))
▶	50.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im)))
	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 im (fma.f64 (*.f64 re re) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) re) re (neg.f64 im))))
	31.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
	31.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 im (neg.f64 (*.f64 im im))))))
✓	26.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 786 to 608 computations (22.6% saved)

simplify170.0ms (1.8%)

Memory

18.8MiB live, 173.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	#s(approx (exp (neg im)) #s(literal 1 binary64))
cost-diff	0	(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
cost-diff	0	(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
cost-diff	0	#s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (.f64 #s(literal -2 binary64) im)))
cost-diff	0	(.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
cost-diff	320	(fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (.f64 #s(literal -2 binary64) im))
cost-diff	0	(fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))
cost-diff	0	#s(approx (* (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)))
cost-diff	0	(.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
cost-diff	0	(*.f64 im im)
cost-diff	0	(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))
cost-diff	0	#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im)))
cost-diff	0	(fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))
cost-diff	0	(cos.f64 re)
cost-diff	0	(.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64)))
cost-diff	0	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	468
0	88	456
1	161	456
2	324	453
3	700	451
4	1122	451
5	1872	451
6	3321	451
7	4377	451
8	5196	451
9	6554	451
10	7787	451
11	7914	451
0	8012	447

Stop Event

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

Calls

Call 1

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

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

localize248.0ms (2.6%)

Memory

-9.3MiB live, 282.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	24.854389309751443	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
accuracy	29.306533354876773	(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
accuracy	31.673276949579492	#s(approx (exp (neg im)) #s(literal 1 binary64))
accuracy	0.09375	(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im)
accuracy	0.2265625	(.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im)
accuracy	5.315249797181508	#s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (.f64 #s(literal -2 binary64) im)))
accuracy	24.854389309751443	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
accuracy	0.1171875	(.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)
accuracy	0.2693230753464332	(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
accuracy	5.3151427019742075	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
accuracy	25.866507527205453	#s(approx (* (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)))
accuracy	0.05078125	(.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im)
accuracy	0.1015625	(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))
accuracy	8.552505011054128	#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im))
accuracy	24.854389309751443	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im)))
accuracy	0.03125	(fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))
accuracy	0.1171875	(.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)
accuracy	5.3151427019742075	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im))
accuracy	31.04204604954057	#s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64))

Samples

138.0ms	101×	1	valid
61.0ms	155×	0	valid

Compiler

Compiled 594 to 84 computations (85.9% saved)

Precisions

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

ival-exp: 40.0ms (31.2% of total)

ival-mult: 39.0ms (30.5% of total)

const: 16.0ms (12.5% of total)

ival-add: 11.0ms (8.6% of total)

adjust: 7.0ms (5.5% of total)

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

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

exact: 1.0ms (0.8% of total)

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

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

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

series53.0ms (0.5%)

Memory

14.1MiB live, 51.0MiB allocated

Counts

27 → 432

Calls

Call 1

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

simplify189.0ms (2%)

Memory

13.3MiB live, 200.9MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	245	5518
1	729	5251
2	2465	4974
3	6792	4936
0	8386	4612

Stop Event

1×	iter limit
1×	node limit

Counts

432 → 432

Calls

Call 1

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

rewrite159.0ms (1.7%)

Memory

-12.3MiB live, 186.6MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	431
0	88	419
1	295	419
2	1763	419
0	8683	415

Stop Event

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

Counts

27 → 497

Calls

Call 1

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

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

eval205.0ms (2.1%)

Memory: 14.9MiB live, 286.6MiB allocated
Compiler: Compiled 22 453 to 3 386 computations (84.9% saved)

prune103.0ms (1.1%)

Memory

4.2MiB live, 125.8MiB allocated

Pruning

36 alts after pruning (29 fresh and 7 done)

	Pruned	Kept	Total
New	1 057	13	1 070
Fresh	2	16	18
Picked	3	2	5
Done	1	5	6
Total	1 063	36	1 099

Accuracy

99.9%

Counts

1 099 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	95.4%	(.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)))
	55.5%	(.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)))
	29.8%	(.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 #s(approx (+ ( -1/3 (* im im)) -2) (.f64 #s(literal -1/3 binary64) (.f64 im im))) im)))
	50.3%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
	50.9%	(.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 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
	52.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 im (cos.f64 re)) (.f64 im (cos.f64 re)))) (+.f64 #s(literal 0 binary64) (.f64 im (cos.f64 re)))))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	65.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) (.f64 im im) #s(literal 1 binary64)) (.f64 (fma.f64 (pow.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)) (cos.f64 re)))) im))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 re) (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) im))
✓	39.8%	#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)))
✓	38.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
	3.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
	86.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im) (cos.f64 re)))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64)))) im))
	51.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 re))) im))
✓	91.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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))
✓	86.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im))
✓	52.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) (.f64 im im) (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
	55.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))) #s(literal 1/2 binary64)))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 (.f64 #s(literal -1/120 binary64) im) im #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im))
	55.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/120 binary64) im)) im (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)))) im))
	55.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (.f64 #s(literal -1/120 binary64) (.f64 im im))) (*.f64 im im) #s(literal -1 binary64))) im))
	35.7%	#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))
	34.6%	#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))
	32.9%	#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))
	57.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (+ (* (pow im 3) (* (cos re) (+ (* (* im im) (+ (* -1/5040 (* im im)) -1/120)) -1/6))) (* (neg (cos re)) im)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (pow.f64 im #s(literal 3 binary64)) (neg.f64 im))))
	39.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (fma.f64 (.f64 im im) (/.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 (.f64 #s(literal -1/6 binary64) (.f64 im im)) im))))
	57.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im)))
	50.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)) im)))
	28.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 #s(approx (+ ( -1/6 (* im im)) -1) (.f64 #s(literal -1/6 binary64) (.f64 im im))) im)))
	34.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (.f64 (.f64 im (fma.f64 (*.f64 re re) #s(literal -1/24 binary64) #s(literal 1/2 binary64))) re) re (neg.f64 im))))
	31.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
	31.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 im (neg.f64 (*.f64 im im))))))
✓	26.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 1 391 to 692 computations (50.3% saved)

regimes102.0ms (1.1%)

Memory

2.5MiB live, 193.6MiB allocated

Counts

53 → 2

Calls

Call 1

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

Outputs

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

Calls

6 calls:

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

Results

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

regimes49.0ms (0.5%)

Memory

6.6MiB live, 43.0MiB allocated

Counts

49 → 2

Calls

Call 1

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

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

Calls

2 calls:

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

regimes52.0ms (0.5%)

Memory

-5.8MiB live, 72.2MiB allocated

Counts

45 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 20 to 20 computations (0% saved)

regimes15.0ms (0.2%)

Memory

-8.1MiB live, 27.0MiB allocated

Counts

43 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

13.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes12.0ms (0.1%)

Memory

30.7MiB live, 30.7MiB allocated

Counts

42 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

10.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes14.0ms (0.1%)

Memory

-6.2MiB live, 31.0MiB allocated

Counts

41 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes30.0ms (0.3%)

Memory

-29.9MiB live, 18.8MiB allocated

Counts

40 → 3

Calls

Call 1

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

Outputs

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

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

#s(approx (* (* 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))

Calls

1 calls:

28.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes12.0ms (0.1%)

Memory

18.2MiB live, 18.2MiB allocated

Counts

38 → 3

Calls

Call 1

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

Outputs

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

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

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes24.0ms (0.3%)

Memory

9.0MiB live, 46.0MiB allocated

Counts

36 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 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)))
11.0ms	im

Results

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

Compiler

Compiled 13 to 13 computations (0% saved)

regimes12.0ms (0.1%)

Memory

-12.2MiB live, 24.8MiB allocated

Counts

35 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

10.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes66.0ms (0.7%)

Memory

26.6MiB live, 132.2MiB allocated

Counts

34 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
85.3%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
74.1%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
74.1%	2	`(cos.f64 re)`
72.6%	2	`re`
98.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 26 to 28 computations (-7.7% saved)

regimes21.0ms (0.2%)

Memory

12.8MiB live, 49.7MiB allocated

Counts

33 → 3

Calls

Call 1

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

Calls

2 calls:

10.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
88.2%	4	`im`
96.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 13 to 13 computations (0% saved)

regimes71.0ms (0.7%)

Memory

-8.8MiB live, 187.3MiB allocated

Counts

32 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

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

regimes82.0ms (0.9%)

Memory

-6.3MiB live, 32.5MiB allocated

Counts

25 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

regimes27.0ms (0.3%)

Memory

28.0MiB live, 61.8MiB allocated

Counts

24 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes10.0ms (0.1%)

Memory

-17.0MiB live, 18.8MiB allocated

Counts

21 → 2

Calls

Call 1

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

Outputs

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

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

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

regimes41.0ms (0.4%)

Memory

-66.0MiB live, 67.5MiB allocated

Counts

20 → 2

Calls

Call 1

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

Outputs

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

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes13.0ms (0.1%)

Memory

34.4MiB live, 34.4MiB allocated

Counts

11 → 2

Calls

Call 1

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

Outputs

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

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes16.0ms (0.2%)

Memory

-12.4MiB live, 27.2MiB allocated

Counts

9 → 2

Calls

Call 1

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

Outputs

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

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

Calls

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

Results

Accuracy	Segments	Branch
50.9%	1	`im`
60.8%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
60.8%	2	`(cos.f64 re)`
60.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 19 to 21 computations (-10.5% saved)

regimes9.0ms (0.1%)

Memory

11.4MiB live, 11.4MiB allocated

Counts

7 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

Results

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

regimes51.0ms (0.5%)

Memory

-12.3MiB live, 26.6MiB allocated

Counts

5 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes14.0ms (0.1%)

Memory

-13.5MiB live, 25.2MiB allocated

Counts

3 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

6 calls:

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

regimes10.0ms (0.1%)

Memory

21.6MiB live, 21.6MiB allocated

Accuracy

Total -15.1b remaining (-32.1%)

Threshold costs -15.1b (-32.1%)

Counts

2 → 1

Calls

Call 1

Inputs

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

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

Calls

6 calls:

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

bsearch1.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.16271298482216556	-0.05745858671878923

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.16271298482216556	-0.05745858671878923

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08135649241108278	-0.028729293359394614

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

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.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

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.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch2.0ms (0%)

Memory

-39.2MiB live, 1.4MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.010002008470962928	+inf
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.010002008470962928	+inf
0.0ms	-7.154355187888317e-6	-4.5269294382658655e-13

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.2161436013002652e-5

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.0	1.2161436013002652e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.2161436013002652e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.2161436013002652e-5

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.0	1.2161436013002652e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.6MiB live, 0.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.2161436013002652e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.2161436013002652e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.2161436013002652e-5

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-inf	-0.08135649241108278

Compiler

Compiled 15 to 16 computations (-6.7% saved)

simplify37.0ms (0.4%)

Memory

30.8MiB live, 69.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	190	1919
1	239	1919
2	251	1919
3	256	1919
4	258	1919

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/36028797018963968 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))) (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))))
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/36028797018963968 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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 -3602879701896397/72057594037927936 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) (.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 (* (* 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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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)) #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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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))) #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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im) (cos.f64 re))) #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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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 (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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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 (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))))
(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/1180591620717411303424 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 5764607523034235/288230376151711744 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 (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))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (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)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im))) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/120 binary64) im)) im (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)))) im)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (.f64 #s(literal -1/120 binary64) (.f64 im im))) (.f64 im im) #s(literal -1 binary64))) im)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 #s(approx (+ ( -1/6 (* im im)) -1) (.f64 #s(literal -1/6 binary64) (.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))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Outputs
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/36028797018963968 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))) (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))))
(if (<=.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -3602879701896397/36028797018963968 binary64)) (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 (pow.f64 im #s(literal 3 binary64)) (.f64 (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)) (cos.f64 re)) (.f64 (neg.f64 im) (cos.f64 re)))))
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -3602879701896397/36028797018963968 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -3602879701896397/36028797018963968 binary64)) (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 (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/72057594037927936 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -3602879701896397/72057594037927936 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (*.f64 (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)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)) (*.f64 (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)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) (.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 (* (* 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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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))) #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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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)) #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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 im im) (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64)) (cos.f64 re)) 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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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))) #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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) (.f64 #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64))) #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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im) (cos.f64 re))) #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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im) (cos.f64 re))) #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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 im im) #s(approx (+ ( -1/120 (* im im)) -1/6) #s(literal -1/6 binary64)) #s(literal -1 binary64)) (cos.f64 re)) 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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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 (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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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 (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))))
(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))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 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 (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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) (cos.f64 re))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #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))))
(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/1180591620717411303424 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 5764607523034235/288230376151711744 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 (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))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -5902958103587057/1180591620717411303424 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 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 5764607523034235/288230376151711744 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (neg.f64 im) (cos.f64 re))) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #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))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (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)))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (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)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im))) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (.f64 im im) #s(literal -1/120 binary64)) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64)) im))) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (.f64 (.f64 im im) (.f64 #s(literal -1/120 binary64) im)) im (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)))) im)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (.f64 (.f64 #s(literal -1/120 binary64) im) (.f64 im im)) im (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)))) im)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) im)) (.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) 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 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (.f64 im im) #s(literal -1/6 binary64)) (.f64 im im) #s(literal -1 binary64))) 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 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (.f64 #s(literal -1/120 binary64) (.f64 im im))) (.f64 im im) #s(literal -1 binary64))) im)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (* im im) (+ (* -1/120 (* im im)) -1/6)) -1)) (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (.f64 #s(literal -1/120 binary64) (.f64 im im))) (.f64 im im) #s(literal -1 binary64))) im)) #s(approx ( (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) (.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 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 #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 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64)) im)))
(if (<=.f64 (.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 #s(approx (+ ( -1/6 (* im im)) -1) (.f64 #s(literal -1/6 binary64) (.f64 im im))) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im))))
(if (<=.f64 (.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (.f64 #s(approx (+ ( -1/6 (* im im)) -1) (.f64 #s(literal -1/6 binary64) (.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))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

soundness1.9s (19.8%)

Memory

-13.6MiB live, 1 420.2MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	245	5518
1	729	5251
2	2465	4974
3	6792	4936
0	8386	4612
0	206	3253
1	579	3079
2	1843	3042
3	4230	2988
0	8496	2830
0	126	650
1	321	616
2	909	610
3	2943	589
4	6409	589
0	8371	556
0	346	5630
1	1051	5377
2	3724	5092
3	7426	5086
0	8171	4766
0	58	431
0	88	419
1	295	419
2	1763	419
0	8683	415

Stop Event

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

Compiler

Compiled 1 622 to 714 computations (56% saved)

preprocess314.0ms (3.3%)

Memory: 19.0MiB live, 396.8MiB allocated
Remove: (abs re)
Compiler: Compiled 2 660 to 560 computations (78.9% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated