Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory

1.0MiB live, 1.0MiB 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.4s (24.5%)

Memory

5.5MiB live, 3 467.6MiB allocated

Samples

822.0ms	1 465×	2	valid
630.0ms	2 502×	1	valid
592.0ms	4 289×	0	valid

Precisions

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

ival-exp: 1.0s (58.3% of total)

ival-cos: 210.0ms (11.8% of total)

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

adjust: 182.0ms (10.3% of total)

ival-sub: 116.0ms (6.5% of total)

exact: 9.0ms (0.5% of total)

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

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

Bogosity

explain180.0ms (1.8%)

Memory

-6.6MiB live, 515.0MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
133	0	-	-	`(-.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	1	(3.7506706935489226e-106 -532.6416129294325)	-	`(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	133	0
`exp.f64`	`(exp.f64 (-.f64 #s(literal 0 binary64) im))`	sensitivity	1	0

Confusion

	Predicted +	Predicted -
+	133	0
-	1	122

Precision

0.9925373134328358

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	133	0	0
-	1	0	122

Precision?

0.9925373134328358

Recall?

1.0

Freqs

test

number	freq
0	122
1	134

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

42.0ms	94×	2	valid
37.0ms	164×	1	valid
26.0ms	254×	0	valid

Compiler

Compiled 92 to 37 computations (59.8% saved)

Precisions

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

ival-exp: 42.0ms (53.8% of total)

ival-cos: 13.0ms (16.6% of total)

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

adjust: 7.0ms (9% of total)

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

exact: 1.0ms (1.3% of total)

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

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

preprocess134.0ms (1.3%)

Memory

14.2MiB live, 95.1MiB allocated

Algorithm

1×	egg-herbie

Rules

772×	`lower-fma.f64`
772×	`lower-fma.f32`
484×	`lower-*.f32`
480×	`lower-*.f64`
460×	`times-frac`

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

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

Outputs

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

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

Symmetry

(abs re)

(negabs im)

Compiler

Compiled 12 to 11 computations (8.3% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	51.9%	(.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)

simplify42.0ms (0.4%)

Memory

-8.3MiB live, 31.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Rules

772×	`lower-fma.f64`
772×	`lower-fma.f32`
484×	`lower-*.f32`
480×	`lower-*.f64`
206×	`distribute-lft-in`

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)

localize70.0ms (0.7%)

Memory

13.6MiB live, 173.5MiB allocated

Localize:

Found 4 expressions of interest:

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

Samples

26.0ms	82×	1	valid
20.0ms	47×	2	valid
16.0ms	127×	0	valid

Compiler

Compiled 40 to 13 computations (67.5% saved)

Precisions

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

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

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

adjust: 5.0ms (10.4% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series10.0ms (0.1%)

Memory

-16.4MiB live, 23.0MiB 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	@	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	@	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	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))

simplify169.0ms (1.7%)

Memory

-5.1MiB live, 277.3MiB allocated

Algorithm

1×	egg-herbie

Rules

19 220×	`lower-fma.f64`
19 220×	`lower-fma.f32`
5 096×	`lower-*.f64`
5 096×	`lower-*.f32`
4 044×	`lower-+.f64`

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)

rewrite92.0ms (0.9%)

Memory

12.1MiB live, 171.8MiB allocated

Rules

1 682×	`lower-fma.f64`
1 682×	`lower-fma.f32`
1 604×	`lower-*.f32`
1 600×	`lower-*.f64`
1 456×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

6 → 206

Calls

Call 1

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

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

eval43.0ms (0.4%)

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

prune13.0ms (0.1%)

Memory

13.8MiB live, 53.3MiB allocated

Pruning

10 alts after pruning (10 fresh and 0 done)

	Pruned	Kept	Total
New	280	10	290
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	281	10	291

Accuracy

99.9%

Counts

291 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.9%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im)))
	51.9%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	94.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)))
▶	91.3%	(.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)))
	83.9%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im)))
▶	37.9%	#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))))
▶	37.9%	#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)))
▶	94.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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))
	84.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal 1/6 binary64) im)))
▶	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))

Compiler

Compiled 290 to 230 computations (20.7% saved)

simplify158.0ms (1.6%)

Memory

-6.6MiB live, 277.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

13 334×	`lower-fma.f32`
13 322×	`lower-fma.f64`
4 792×	`lower-*.f32`
4 772×	`lower-*.f64`
1 834×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	348
0	77	342
1	139	342
2	288	342
3	807	342
4	2070	342
5	4674	342
6	6175	342
0	8066	340

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

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

localize200.0ms (2%)

Memory

13.9MiB live, 531.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.006191259768442017	(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
accuracy	4.269693608178108	(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
accuracy	25.13883046510246	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
accuracy	30.782479588849213	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0	(exp.f64 (neg.f64 im))
accuracy	0	(exp.f64 im)
accuracy	24.256250495320085	#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	30.782479588849213	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	0.03125	(fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64))
accuracy	0.07421875	(.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.10546875	(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
accuracy	5.466803277574151	#s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy	0	(neg.f64 (cos.f64 re))
accuracy	0	(cos.f64 re)
accuracy	0.1171875	(*.f64 (neg.f64 (cos.f64 re)) im)
accuracy	29.16153817606265	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
accuracy	0.08984375	(.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)
accuracy	0.1015625	(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
accuracy	0.2824428769543987	(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
accuracy	3.7634002282283836	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.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))

Samples

61.0ms	82×	1	valid
57.0ms	47×	2	valid
44.0ms	127×	0	valid

Compiler

Compiled 289 to 47 computations (83.7% saved)

Precisions

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

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

ival-mult: 30.0ms (23.7% of total)

const: 20.0ms (15.8% of total)

adjust: 14.0ms (11% of total)

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

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

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

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

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

exact: 1.0ms (0.8% of total)

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

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

series56.0ms (0.6%)

Memory

-14.5MiB live, 108.9MiB allocated

Counts

23 → 384

Calls

Call 1

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

Calls

6 calls:

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

simplify227.0ms (2.3%)

Memory

29.9MiB live, 265.4MiB allocated

Algorithm

1×	egg-herbie

Rules

18 174×	`lower-fma.f64`
18 174×	`lower-fma.f32`
5 676×	`lower-+.f64`
5 676×	`lower-+.f32`
5 154×	`lower-*.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	304	4825
1	940	4461
2	3335	4223
3	6540	4221
0	8303	3952

Stop Event

1×	iter limit
1×	node limit

Counts

384 → 384

Calls

Call 1

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

rewrite164.0ms (1.7%)

Memory

-18.9MiB live, 246.5MiB allocated

Rules

4 834×	`lower-fma.f32`
4 822×	`lower-fma.f64`
4 032×	`lower-*.f32`
4 012×	`lower-*.f64`
3 904×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	264
0	77	258
1	263	258
2	1667	258
0	8266	258

Stop Event

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

Counts

23 → 502

Calls

Call 1

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

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

eval154.0ms (1.5%)

Memory: 24.8MiB live, 303.0MiB allocated
Compiler: Compiled 25 173 to 3 116 computations (87.6% saved)

prune52.0ms (0.5%)

Memory

-0.2MiB live, 164.6MiB allocated

Pruning

26 alts after pruning (24 fresh and 2 done)

	Pruned	Kept	Total
New	1 054	21	1 075
Fresh	2	3	5
Picked	3	2	5
Done	0	0	0
Total	1 059	26	1 085

Accuracy

100.0%

Counts

1 085 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.9%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im)))
▶	51.9%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	94.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)))
✓	91.3%	(.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)))
	56.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 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	56.6%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	55.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 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
▶	37.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
	58.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))
	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) (.f64 #s(literal 0 binary64) (cos.f64 re))))) im))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (cos.f64 re)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) im))
	37.7%	#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)))
▶	94.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re)))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
	83.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
✓	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	58.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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(literal 1/2 binary64)))
	50.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
	83.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (+ (* -1/5040 (* im im)) -1/120) (pow im 4)) (+ (* (* im im) -1/6) -1))) (.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) im))
▶	37.5%	#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))
	37.1%	#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))
	35.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))
	56.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (+ (* (* re re) -1/4) 1/2) (- (exp (neg im)) (exp im))) (fma.f64 (pow.f64 im #s(literal 3 binary64)) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64))) (.f64 (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64)) im))))
▶	29.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 823 to 626 computations (23.9% saved)

simplify134.0ms (1.3%)

Memory

13.1MiB live, 167.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 19 expressions of interest:

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

Rules

14 052×	`lower-fma.f32`
14 038×	`lower-fma.f64`
5 266×	`lower-*.f32`
5 250×	`lower-*.f64`
1 986×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	53	372
0	83	368
1	145	368
2	281	368
3	748	368
4	2071	368
5	4197	368
6	6093	368
0	8159	365

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

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

localize219.0ms (2.2%)

Memory

-12.8MiB live, 359.2MiB allocated

Localize:

Found 19 expressions of interest:

New	Metric	Score
accuracy	0	(exp.f64 im)
accuracy	0	(cos.f64 re)
accuracy	0.07421875	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
accuracy	30.782479588849213	(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy	4.269693608178108	(.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)))
accuracy	25.13883046510246	#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 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
accuracy	30.179902548873105	#s(approx (exp (neg im)) #s(literal 1 binary64))
accuracy	30.782479588849213	(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
accuracy	0.0703125	(fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64))
accuracy	0.1171875	(.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)
accuracy	29.16153817606265	#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))
accuracy	32.89171467633609	#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)))
accuracy	0	(neg.f64 im)
accuracy	29.16153817606265	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
accuracy	30.125885057954925	#s(approx (* (neg (cos re)) im) (neg.f64 im))
accuracy	0.09375	(.f64 (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re))
accuracy	0.1015625	(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))
accuracy	0.2824428769543987	(fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64))
accuracy	3.7634002282283836	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re)))

Samples

66.0ms	127×	0	valid
58.0ms	82×	1	valid
58.0ms	47×	2	valid

Compiler

Compiled 280 to 49 computations (82.5% saved)

Precisions

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

ival-mult: 38.0ms (28.3% of total)

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

const: 19.0ms (14.1% of total)

adjust: 13.0ms (9.7% of total)

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

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

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

ival-pow: 4.0ms (3% of total)

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

exact: 1.0ms (0.7% of total)

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

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

series32.0ms (0.3%)

Memory

-23.4MiB live, 56.2MiB allocated

Counts

24 → 396

Calls

Call 1

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

simplify205.0ms (2.1%)

Memory

18.7MiB live, 200.5MiB allocated

Algorithm

1×	egg-herbie

Rules

17 024×	`lower-fma.f64`
17 024×	`lower-fma.f32`
6 288×	`lower-+.f64`
6 288×	`lower-+.f32`
5 698×	`lower-*.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	271	4389
1	811	4092
2	2805	3902
3	7393	3902
0	8047	3690

Stop Event

1×	iter limit
1×	node limit

Counts

396 → 396

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

rewrite204.0ms (2%)

Memory

20.2MiB live, 210.9MiB allocated

Rules

4 860×	`lower-fma.f32`
4 846×	`lower-fma.f64`
4 238×	`lower-*.f32`
4 222×	`lower-*.f64`
3 354×	`lower-/.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	53	289
0	83	285
1	286	285
2	1883	285
0	8239	285

Stop Event

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

Counts

24 → 370

Calls

Call 1

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

eval122.0ms (1.2%)

Memory: -21.7MiB live, 263.3MiB allocated
Compiler: Compiled 19 400 to 2 422 computations (87.5% saved)

prune63.0ms (0.6%)

Memory

17.1MiB live, 141.2MiB allocated

Pruning

31 alts after pruning (27 fresh and 4 done)

	Pruned	Kept	Total
New	890	11	901
Fresh	3	16	19
Picked	3	2	5
Done	0	2	2
Total	896	31	927

Accuracy

100.0%

Counts

927 → 31

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.9%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im)))
✓	51.9%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	94.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)))
✓	91.3%	(.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)))
	56.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 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
▶	56.6%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	55.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 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
▶	83.9%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	24.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))
	13.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
	2.6%	#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 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))))
	58.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (.f64 im im) #s(literal -2 binary64)) im))))
	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) (.f64 #s(literal 0 binary64) (cos.f64 re))))) im))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (cos.f64 re)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) im))
	37.7%	#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)))
▶	94.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re)))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
✓	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	58.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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(literal 1/2 binary64)))
	50.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
	14.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
	83.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (+ (* -1/5040 (* im im)) -1/120) (pow im 4)) (+ (* (* im im) -1/6) -1))) (.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) im))
	37.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(approx (+ ( 1/720 (* re re)) -1/24) (.f64 #s(literal 1/720 binary64) (.f64 re re))) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64))) im))
	37.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(approx (+ ( 1/720 (* re re)) -1/24) #s(literal -1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64))) im))
▶	35.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))
	32.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
	18.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (pow.f64 (neg.f64 im) #s(literal 3 binary64))))))
▶	32.3%	#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))))))
✓	29.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 918 to 705 computations (23.2% saved)

simplify205.0ms (2.1%)

Memory

-9.2MiB live, 153.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

14 296×	`lower-fma.f32`
14 280×	`lower-fma.f64`
4 326×	`lower-*.f32`
4 304×	`lower-*.f64`
1 824×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	58	426
0	91	421
1	182	411
2	427	378
3	1101	378
4	2424	378
5	6197	378
0	8173	375

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

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

localize253.0ms (2.5%)

Memory

-10.8MiB live, 343.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.06640625	(fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))
accuracy	0.1171875	(*.f64 (cos.f64 re) im)
accuracy	0.30859375	(*.f64 #s(literal -1/6 binary64) im)
accuracy	10.244977139212383	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
accuracy	0.07421875	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
accuracy	0.10546875	(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
accuracy	5.466803277574151	#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	32.728323361568194	#s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
accuracy	0.17578125	(/.f64 #s(literal 1 binary64) (/.f64 im (neg.f64 (*.f64 im im))))
accuracy	26.986081145764867	(/.f64 im (neg.f64 (*.f64 im im)))
accuracy	29.16153817606265	#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))))))
accuracy	30.125885057954925	#s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 im (neg.f64 (*.f64 im im)))))
accuracy	0.006191259768442017	(fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))
accuracy	0.1171875	(.f64 #s(approx (neg (cos re)) (fma.f64 (.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)
accuracy	29.16153817606265	#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))
accuracy	32.72833146803832	#s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64)))
accuracy	0.1015625	(fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))
accuracy	0.1796875	(.f64 (.f64 im im) (*.f64 im im))
accuracy	0.2824428769543987	(fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64))
accuracy	3.7634002282283836	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re)))

Samples

84.0ms	127×	0	valid
68.0ms	82×	1	valid
59.0ms	47×	2	valid

Compiler

Compiled 317 to 57 computations (82% saved)

Precisions

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

ival-add: 46.0ms (26.4% of total)

ival-mult: 41.0ms (23.5% of total)

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

const: 17.0ms (9.8% of total)

adjust: 14.0ms (8% of total)

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

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

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

ival-neg: 3.0ms (1.7% 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

27.5MiB live, 65.3MiB allocated

Counts

25 → 408

Calls

Call 1

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

Calls

6 calls:

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

simplify209.0ms (2.1%)

Memory

-23.7MiB live, 251.2MiB allocated

Algorithm

1×	egg-herbie

Rules

12 474×	`lower-fma.f64`
12 474×	`lower-fma.f32`
5 446×	`lower-*.f64`
5 446×	`lower-*.f32`
4 372×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	242	3892
1	684	3704
2	2307	3562
3	5536	3497
0	8162	3301

Stop Event

1×	iter limit
1×	node limit

Counts

408 → 407

Calls

Call 1

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

rewrite230.0ms (2.3%)

Memory

18.9MiB live, 281.2MiB allocated

Rules

7 846×	`lower-fma.f32`
7 830×	`lower-fma.f64`
4 766×	`lower-*.f32`
4 744×	`lower-*.f64`
3 420×	`lower-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	58	311
0	91	300
1	339	274
2	2095	274
0	8397	274

Stop Event

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

Counts

25 → 585

Calls

Call 1

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

eval585.0ms (5.9%)

Memory: -229.1MiB live, 454.6MiB allocated
Compiler: Compiled 27 320 to 4 230 computations (84.5% saved)

prune79.0ms (0.8%)

Memory

-1.1MiB live, 198.1MiB allocated

Pruning

41 alts after pruning (33 fresh and 8 done)

	Pruned	Kept	Total
New	1 336	17	1 353
Fresh	6	16	22
Picked	1	4	5
Done	0	4	4
Total	1 343	41	1 384

Accuracy

100.0%

Counts

1 384 → 41

Alt Table

Click to see full alt table

Status	Accuracy	Program
	51.9%	(fma.f64 (.f64 (neg.f64 (exp.f64 im)) #s(literal 1/2 binary64)) (cos.f64 re) (/.f64 (.f64 (cos.f64 re) #s(literal 1/2 binary64)) (exp.f64 im)))
✓	51.9%	(.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (cos.f64 re) #s(literal 1/2 binary64)))
	94.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)))
✓	91.3%	(.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)))
	58.4%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.f64 im im) #s(literal -1/60 binary64)) (.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	56.6%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	56.6%	(.f64 #s(approx ( 1/2 (cos 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(approx (+ (* -1/60 (* im im)) -1/3) (.f64 #s(literal -1/60 binary64) (.f64 im im))) (*.f64 im im) #s(literal -2 binary64)) im)))
	52.9%	(.f64 #s(approx ( 1/2 (cos 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(approx (+ (* -1/60 (* im im)) -1/3) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
	46.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 1/4 binary64)) re) re))) #s(approx (- (exp (- 0 im)) (exp im)) (.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (.f64 im im) #s(literal -1/3 binary64)) (.f64 im im) #s(literal -2 binary64)) im)))
	55.8%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* (* re re) -1/4) 1/2) #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)))
	91.3%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.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))
✓	83.9%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	53.0%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 re re) #s(literal -1/2 binary64)) (.f64 re re) #s(literal 1 binary64))) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	50.3%	#s(approx (* (- (exp (neg im)) (exp im)) (* (cos re) 1/2)) (.f64 (.f64 #s(approx (cos re) #s(literal 1 binary64)) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64))))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
	24.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))))))
	13.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (fma.f64 (.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
	2.6%	#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 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))))
	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (cos.f64 re) (cos.f64 re) (.f64 #s(literal 0 binary64) (cos.f64 re))))) im))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (cos.f64 re)) (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))))) im))
	37.7%	#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)))
✓	94.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re)))
	58.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 (.f64 im im) (.f64 im im)) (fma.f64 (.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (.f64 im im) #s(literal -1 binary64))) im) #s(approx (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)))))
	91.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (fma.f64 (.f64 (.f64 im im) (.f64 im im)) #s(approx (+ ( (* im im) -1/5040) -1/120) #s(literal -1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 im im) #s(literal -1 binary64))) im) (cos.f64 re)))
	54.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 re) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (cos.f64 re)))) im))
✓	54.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
	58.4%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (.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(literal 1/2 binary64)))
	50.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (- (exp (neg im)) (exp im)) (.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
	14.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (+ ( (* re re) -1/4) 1/2) (.f64 (.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))))
	83.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx ( (cos re) (+ (* (+ (* -1/5040 (* im im)) -1/120) (pow im 4)) (+ (* (* im im) -1/6) -1))) (.f64 (cos.f64 re) (fma.f64 (.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))) im))
	37.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(approx (+ ( 1/720 (* re re)) -1/24) (.f64 #s(literal 1/720 binary64) (.f64 re re))) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64))) im))
	37.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(approx (+ ( 1/720 (* re re)) -1/24) #s(literal -1/24 binary64)) (.f64 re re) #s(literal 1/2 binary64)) (.f64 re re) #s(literal -1 binary64))) im))
✓	35.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))
	12.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(approx (neg (cos re)) #s(approx (+ ( (* re re) 1/2) -1) (.f64 (.f64 re re) #s(literal 1/2 binary64)))) im))
	32.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (*.f64 (neg.f64 im) im) im)))
	18.5%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 im))) (.f64 (.f64 im im) #s(literal 1 binary64))) (.f64 (*.f64 im im) (neg.f64 (neg.f64 im)))))))
✓	32.3%	#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))))))
	32.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 im #s(literal -1 binary64)) (/.f64 (/.f64 im im) (.f64 im im))))))
	29.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) #s(approx (/ im (neg (* im im))) (/.f64 #s(literal -1 binary64) im)))))
	32.3%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (.f64 (neg.f64 im) im) #s(literal -1 binary64)))))
✓	29.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

Compiler

Compiled 1 669 to 810 computations (51.5% saved)

regimes129.0ms (1.3%)

Memory

27.1MiB live, 175.4MiB allocated

Counts

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

Outputs

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

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

Calls

6 calls:

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

Results

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

regimes60.0ms (0.6%)

Memory

-20.1MiB live, 99.1MiB allocated

Counts

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

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 20 to 20 computations (0% saved)

regimes18.0ms (0.2%)

Memory

18.6MiB live, 51.3MiB allocated

Counts

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

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

Calls

1 calls:

15.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes15.0ms (0.2%)

Memory

15.9MiB live, 52.4MiB allocated

Counts

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

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes13.0ms (0.1%)

Memory

2.9MiB live, 41.9MiB allocated

Counts

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

Outputs

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

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

Calls

1 calls:

11.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes19.0ms (0.2%)

Memory

-34.4MiB live, 53.7MiB allocated

Counts

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

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

Calls

1 calls:

16.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes12.0ms (0.1%)

Memory

9.2MiB live, 48.4MiB allocated

Counts

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

Outputs

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

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

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

Calls

1 calls:

10.0ms

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

Results

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes10.0ms (0.1%)

Memory

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

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

Compiler

Compiled 12 to 11 computations (8.3% saved)

regimes102.0ms (1%)

Memory

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes64.0ms (0.6%)

Memory

2.1MiB live, 119.4MiB allocated

Counts

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

Outputs

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

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

Calls

6 calls:

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

Results

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

regimes27.0ms (0.3%)

Memory

16.7MiB live, 54.9MiB allocated

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes23.0ms (0.2%)

Memory

11.3MiB live, 49.7MiB allocated

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes17.0ms (0.2%)

Memory

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes23.0ms (0.2%)

Memory

-31.1MiB live, 27.7MiB allocated

Counts

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

Outputs

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

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

Calls

3 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)))
5.0ms	(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
5.0ms	(cos.f64 re)

Results

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

Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes10.0ms (0.1%)

Memory

19.6MiB live, 19.6MiB allocated

Counts

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

Outputs

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

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 6 to 8 computations (-33.3% saved)

regimes26.0ms (0.3%)

Memory

2.4MiB live, 40.2MiB allocated

Counts

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

Outputs

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

Calls

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

Results

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

Compiler

Compiled 20 to 23 computations (-15% saved)

regimes15.0ms (0.2%)

Memory

-11.6MiB live, 26.0MiB allocated

Counts

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

Outputs

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

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

Calls

3 calls:

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

Results

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

Compiler

Compiled 13 to 15 computations (-15.4% saved)

regimes19.0ms (0.2%)

Memory

-7.3MiB live, 30.8MiB allocated

Counts

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

Outputs

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

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
43.3%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
37.9%	2	`re`
47.1%	3	`im`
52.9%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
42.0%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
42.0%	2	`(cos.f64 re)`

Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes9.0ms (0.1%)

Memory

22.1MiB live, 22.1MiB 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 #s(approx (neg (cos re)) #s(approx (+ (* (* re re) 1/2) -1) (*.f64 (*.f64 re re) #s(literal 1/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))

Outputs

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

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

Calls

5 calls:

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

Results

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

regimes11.0ms (0.1%)

Memory

-24.1MiB live, 21.5MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

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.5456089890369847	-0.0005594712275688307

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.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

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.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

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.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

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.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.4849548370125445	+inf
0.0ms	-1.0526483926190085e+231	-0.10534926583928642

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08278909199918143	0.0024157074459115802

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08278909199918143	0.0024157074459115802

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.1MiB live, 1.1MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08278909199918143	0.0024157074459115802

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.08278909199918143	0.0024157074459115802

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.9902778976879307	0.9906069193621905
0.0ms	-0.08278909199918143	0.0024157074459115802

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.9902778976879307	0.9906069193621905
0.0ms	-0.1269546468788802	-0.08278909199918143

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.9902778976879307	0.9906069193621905
0.0ms	-0.08278909199918143	0.0024157074459115802

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.08278909199918143	0.0024157074459115802

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.964965360866778e-13
0.0ms	-0.10534926583928642	-0.00025961808851240566

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.08278909199918143	0.0024157074459115802

Compiler

Compiled 15 to 16 computations (-6.7% saved)

simplify38.0ms (0.4%)

Memory

-15.3MiB live, 61.3MiB allocated

Algorithm

1×	egg-herbie

Rules

84×	`-commutative-binary64-.f64`
22×	`sub-neg-binary64-neg.f64-+.f64--.f64`
20×	`+-commutative-binary64-+.f64`
14×	`neg-sub0-binary64--.f64-neg.f64`
14×	`neg-mul-1-binary64-*.f64-neg.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	204	1923
1	260	1923
2	281	1923
3	293	1923
4	297	1923

Stop Event

1×

saturated

Calls

Call 1

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

soundness2.2s (22.5%)

Memory

31.8MiB live, 1 611.8MiB allocated

Rules

19 220×	`lower-fma.f64`
19 220×	`lower-fma.f32`
18 174×	`lower-fma.f64`
18 174×	`lower-fma.f32`
17 024×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	242	3892
1	684	3704
2	2307	3562
3	5536	3497
0	8162	3301
0	53	289
0	83	285
1	286	285
2	1883	285
0	8239	285
0	11	30
0	18	27
1	54	27
2	351	27
0	4157	27
0	271	4389
1	811	4092
2	2805	3902
3	7393	3902
0	8047	3690
0	48	264
0	77	258
1	263	258
2	1667	258
0	8266	258
0	304	4825
1	940	4461
2	3335	4223
3	6540	4221
0	8303	3952
0	126	650
1	321	616
2	909	610
3	2943	589
4	6409	589
0	8371	556

Stop Event

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

Compiler

Compiled 1 918 to 951 computations (50.4% saved)

preprocess245.0ms (2.5%)

Memory: 14.2MiB live, 481.4MiB allocated
Remove: (abs re)
Compiler: Compiled 2 432 to 544 computations (77.6% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze0.0ms (0%)

sample2.4s (24.5%)

explain180.0ms (1.8%)

preprocess134.0ms (1.3%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify42.0ms (0.4%)

localize70.0ms (0.7%)

series10.0ms (0.1%)

simplify169.0ms (1.7%)

rewrite92.0ms (0.9%)

eval43.0ms (0.4%)

prune13.0ms (0.1%)

simplify158.0ms (1.6%)

localize200.0ms (2%)

series56.0ms (0.6%)

simplify227.0ms (2.3%)

rewrite164.0ms (1.7%)

eval154.0ms (1.5%)

prune52.0ms (0.5%)

simplify134.0ms (1.3%)

localize219.0ms (2.2%)

series32.0ms (0.3%)

simplify205.0ms (2.1%)

rewrite204.0ms (2%)

eval122.0ms (1.2%)

prune63.0ms (0.6%)

simplify205.0ms (2.1%)

localize253.0ms (2.5%)

series47.0ms (0.5%)

simplify209.0ms (2.1%)

rewrite230.0ms (2.3%)

eval585.0ms (5.9%)

prune79.0ms (0.8%)

regimes129.0ms (1.3%)

regimes60.0ms (0.6%)

regimes18.0ms (0.2%)

regimes15.0ms (0.2%)

regimes13.0ms (0.1%)

regimes19.0ms (0.2%)

regimes12.0ms (0.1%)

regimes10.0ms (0.1%)

regimes102.0ms (1%)

regimes64.0ms (0.6%)

regimes27.0ms (0.3%)

regimes23.0ms (0.2%)

regimes17.0ms (0.2%)

regimes23.0ms (0.2%)

regimes10.0ms (0.1%)

regimes26.0ms (0.3%)

regimes15.0ms (0.2%)

regimes19.0ms (0.2%)

regimes9.0ms (0.1%)

regimes11.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify38.0ms (0.4%)

soundness2.2s (22.5%)

preprocess245.0ms (2.5%)

end0.0ms (0%)

Profiling