math.sin on complex, imaginary part

Time bar (total: 35.6s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
100%99.9%0%0.1%0%0%0%1
Compiler

Compiled 14 to 13 computations (7.1% saved)

sample2.5s (6.9%)

Memory
20.3MiB live, 3 040.0MiB allocated
Samples
942.0ms1 538×2valid
642.0ms2 411×1valid
530.0ms4 307×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.8s
ival-exp: 932.0ms (51.7% of total)
ival-cos: 293.0ms (16.3% of total)
ival-sub: 220.0ms (12.2% of total)
ival-mult: 204.0ms (11.3% of total)
adjust: 134.0ms (7.4% of total)
exact: 9.0ms (0.5% of total)
ival-true: 6.0ms (0.3% of total)
ival-assert: 4.0ms (0.2% of total)
Bogosity

explain178.0ms (0.5%)

Memory
-1.3MiB live, 442.0MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1250-0-(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
00-0-(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
00-0-(exp.f64 im)
00-0-#s(literal 0 binary64)
00-0-(cos.f64 re)
00-0-im
00-0-(-.f64 #s(literal 0 binary64) im)
00-0-re
00-0-(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
00-0-#s(literal 1/2 binary64)
00-0-(exp.f64 (-.f64 #s(literal 0 binary64) im))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))cancellation1250
Confusion
Predicted +Predicted -
+1250
-0131
Precision
1.0
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+12500
-00131
Precision?
1.0
Recall?
1.0
Freqs
test
numberfreq
0131
1125
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
40.0ms88×2valid
35.0ms160×1valid
25.0ms264×0valid
Compiler

Compiled 92 to 37 computations (59.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 76.0ms
ival-exp: 42.0ms (55.2% of total)
ival-cos: 12.0ms (15.8% of total)
ival-mult: 8.0ms (10.5% of total)
adjust: 7.0ms (9.2% of total)
ival-sub: 6.0ms (7.9% of total)
exact: 1.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess131.0ms (0.4%)

Memory
25.5MiB live, 107.2MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02959
17955
223455
373255
4167055
5230855
6251655
7278855
8305255
9324955
10329955
11330755
12330755
13330755
01112
01811
12911
25811
312911
423811
536711
654611
779411
8108411
9121911
10125411
11126111
12126111
0126111
Stop Event
iter limit
saturated
iter limit
saturated
Calls
Call 1
Inputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Outputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
Symmetry

(abs re)

(negabs im)

Compiler

Compiled 12 to 11 computations (8.3% saved)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
54.1%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Compiler

Compiled 12 to 11 computations (8.3% saved)

simplify41.0ms (0.1%)

Memory
-13.8MiB live, 25.8MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(cos.f64 re)
cost-diff0
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
cost-diff0
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
cost-diff64
(-.f64 #s(literal 0 binary64) im)
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01138
01834
12934
25834
312934
423834
536734
654634
779434
8108434
9121934
10125434
11126134
12126134
0126134
Stop Event
iter limit
saturated
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)

localize66.0ms (0.2%)

Memory
-10.8MiB live, 148.4MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0
(exp.f64 im)
accuracy0
(cos.f64 re)
accuracy0.05078125
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
accuracy29.3802590206245
(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
Samples
22.0ms44×2valid
21.0ms80×1valid
14.0ms132×0valid
Compiler

Compiled 40 to 13 computations (67.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-exp: 22.0ms (50.9% of total)
adjust: 8.0ms (18.5% of total)
ival-cos: 6.0ms (13.9% of total)
ival-mult: 4.0ms (9.3% of total)
ival-sub: 3.0ms (6.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series9.0ms (0%)

Memory
19.2MiB live, 19.2MiB allocated
Counts
6 → 84
Calls
Call 1
Inputs
#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())
#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())
#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())
#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())
Outputs
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow re 2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 im) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* 1/2 im)))) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im)))))) (taylor 0 im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 #s(literal 0 binary64) im) (patch (-.f64 #s(literal 0 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt (exp.f64 im) (patch (exp.f64 im) #<representation binary64>) () ())) ())
Calls

6 calls:

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

simplify163.0ms (0.5%)

Memory
13.7MiB live, 246.1MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0126650
1321616
2909610
32943589
46409589
08371556
Stop Event
iter limit
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)

rewrite121.0ms (0.3%)

Memory
-18.2MiB live, 197.6MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01130
01827
15427
235127
0415727
Stop Event
iter limit
iter limit
node limit
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>

eval35.0ms (0.1%)

Memory
-17.9MiB live, 98.4MiB allocated
Compiler

Compiled 6 074 to 864 computations (85.8% saved)

prune10.0ms (0%)

Memory
-7.3MiB live, 36.7MiB allocated
Pruning

6 alts after pruning (6 fresh and 0 done)

PrunedKeptTotal
New2846290
Fresh000
Picked101
Done000
Total2856291
Accuracy
99.9%
Counts
291 → 6
Alt Table
Click to see full alt table
StatusAccuracyProgram
91.8%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
89.9%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
83.6%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
40.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 (exp.f64 (neg.f64 im)) (exp.f64 im))))
40.6%
#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)))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
Compiler

Compiled 172 to 138 computations (19.8% saved)

simplify225.0ms (0.6%)

Memory
21.1MiB live, 218.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
042355
070347
1129347
2247347
3501347
4936347
51563347
62106347
72392347
82598347
92722347
102808347
113079347
123287347
133605347
145296347
157093347
167484347
177498347
187498347
197884347
08051347
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
#s(literal -1/2520 binary64)
(*.f64 im im)
im
#s(literal -1/60 binary64)
#s(literal -1/3 binary64)
#s(literal -2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
(*.f64 (neg.f64 (cos.f64 re)) im)
(neg.f64 (cos.f64 re))
(cos.f64 re)
re
im
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
#s(literal -1/3 binary64)
(*.f64 im im)
im
#s(literal -2 binary64)
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
#s(literal -1/60 binary64)
(*.f64 im im)
im
#s(literal -1/3 binary64)
#s(literal -2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
im
(exp.f64 im)
#s(literal 1/2 binary64)
Outputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
(fma.f64 (*.f64 im im) #s(literal -1/2520 binary64) #s(literal -1/60 binary64))
#s(literal -1/2520 binary64)
(*.f64 im im)
im
#s(literal -1/60 binary64)
#s(literal -1/3 binary64)
#s(literal -2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(*.f64 (neg.f64 im) (cos.f64 re))
(neg.f64 (cos.f64 re))
(cos.f64 re)
re
im
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
#s(literal -1/3 binary64)
(*.f64 im im)
im
#s(literal -2 binary64)
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (*.f64 (cos.f64 re) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 re)
re
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
#s(literal -1/60 binary64)
(*.f64 im im)
im
#s(literal -1/3 binary64)
#s(literal -2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
im
(exp.f64 im)
#s(literal 1/2 binary64)

localize199.0ms (0.6%)

Memory
-15.3MiB live, 464.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0
(exp.f64 (neg.f64 im))
accuracy0
(exp.f64 im)
accuracy22.38419580696134
#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)))
accuracy29.3802590206245
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
accuracy0.05078125
(*.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)))
accuracy0.0546875
(fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
accuracy0.23467766333128165
(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
accuracy6.421102635059745
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy0.05078125
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
accuracy0.05078125
(*.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)))
accuracy0.0625
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy10.425013864937169
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy0
(neg.f64 (cos.f64 re))
accuracy0
(cos.f64 re)
accuracy0.12109375
(*.f64 (neg.f64 (cos.f64 re)) im)
accuracy31.031189584504027
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
accuracy0.03515625
(fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
accuracy0.05078125
(*.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)))
accuracy0.4958353740312863
(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
accuracy5.21975439948532
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
Samples
70.0ms80×1valid
53.0ms44×2valid
43.0ms132×0valid
Compiler

Compiled 274 to 39 computations (85.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 133.0ms
ival-exp: 35.0ms (26.3% of total)
ival-mult: 29.0ms (21.8% of total)
adjust: 26.0ms (19.5% of total)
const: 14.0ms (10.5% of total)
ival-add: 14.0ms (10.5% of total)
ival-cos: 6.0ms (4.5% of total)
ival-sub: 5.0ms (3.8% of total)
ival-neg: 2.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series25.0ms (0.1%)

Memory
26.5MiB live, 65.7MiB allocated
Counts
22 → 336
Calls
Call 1
Inputs
#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())
#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())
#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())
#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())
#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())
#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())
#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())
#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())
#s(alt (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 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow re 2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2))) (taylor 0 re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 im) (* 1/2 (* im (pow re 2)))) (taylor 0 re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im)))) (taylor 0 re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2)))))))) (taylor 0 re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt -1 (taylor 0 re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (pow re 2)) 1) (taylor 0 re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1) (taylor 0 re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1) (taylor 0 re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (patch (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (cos re) (taylor -inf re) (#s(alt (cos.f64 re) (patch (cos.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf re) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor -inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor -inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor -inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (cos re)) (taylor -inf re) (#s(alt (neg.f64 (cos.f64 re)) (patch (neg.f64 (cos.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 im)) (taylor 0 im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* 1/2 im) 1))) (taylor 0 im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1))) (taylor 0 im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt -1/60 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2520 (pow im 2)) 1/60) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2520 (pow im 2)) 1/60) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2520 (pow im 2)) 1/60) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/3 (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt -2 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt -1/3 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt -2 (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 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 4)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 3)) (taylor inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 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 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor -inf im) (#s(alt (*.f64 (neg.f64 (cos.f64 re)) im) (patch (*.f64 (neg.f64 (cos.f64 re)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (patch (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt (exp.f64 (neg.f64 im)) (patch (exp.f64 (neg.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (neg.f64 im) (patch (neg.f64 im) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (patch (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 4)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 3)) (taylor -inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 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:

TimeVariablePointExpression
4.0ms
im
@-inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (exp im))
3.0ms
im
@inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (exp im))
2.0ms
re
@inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (exp im))
2.0ms
im
@0
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (exp im))
1.0ms
re
@-inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (cos re) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg (cos re)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (- 0 im)) (exp im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (- (exp (neg im)) (exp im)) (exp (neg im)) (neg im) (+ (* -1/2520 (* im im)) -1/60) (+ (* (+ (* -1/2520 (* im im)) -1/60) (* im im)) -1/3) (+ (* -1/3 (* im im)) -2) (* (+ (* -1/3 (* im im)) -2) im) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (exp im))

simplify176.0ms (0.5%)

Memory
-4.3MiB live, 270.9MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01993245
15603071
217663032
339752980
081132822
Stop Event
iter limit
node limit
Counts
336 → 336
Calls
Call 1
Inputs
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
1
(+ 1 (* -1/2 (pow re 2)))
(+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))
(+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* -1 im)
(+ (* -1 im) (* 1/2 (* im (pow re 2))))
(+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))
(+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2))))))))
-1
(- (* 1/2 (pow re 2)) 1)
(- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)
(- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(cos re)
(cos re)
(cos re)
(cos re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (cos re))
(* -1 (cos re))
(* -1 (cos re))
(* -1 (cos re))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(cos re)
(cos re)
(cos re)
(cos re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (cos re))
(* -1 (cos re))
(* -1 (cos re))
(* -1 (cos re))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
1
(+ 1 (* -1 im))
(+ 1 (* im (- (* 1/2 im) 1)))
(+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
-1/60
(- (* -1/2520 (pow im 2)) 1/60)
(- (* -1/2520 (pow im 2)) 1/60)
(- (* -1/2520 (pow im 2)) 1/60)
-1/3
(- (* -1/60 (pow im 2)) 1/3)
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
-2
(- (* -1/3 (pow im 2)) 2)
(- (* -1/3 (pow im 2)) 2)
(- (* -1/3 (pow im 2)) 2)
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* -1/3 (pow im 2)) 2))
-1/3
(- (* -1/60 (pow im 2)) 1/3)
(- (* -1/60 (pow im 2)) 1/3)
(- (* -1/60 (pow im 2)) 1/3)
-2
(- (* -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))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
(* -1/2520 (pow im 2))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1/2520 (pow im 4))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* -1/3 (pow im 2))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/3 (pow im 3))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/60 (pow im 2))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1/60 (pow im 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))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
(* -1/2520 (pow im 2))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1/2520 (pow im 4))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* -1/3 (pow im 2))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/3 (pow im 3))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1/60 (pow im 2))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1/60 (pow im 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)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow re 2)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow re 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 re re) #s(literal 1 binary64))
(+ 1 (* (pow re 2) (- (* 1/24 (pow re 2)) 1/2)))
(fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 re re) #s(literal -1/2 binary64)) (*.f64 re re) #s(literal 1 binary64))
(+ 1 (* (pow re 2) (- (* (pow re 2) (+ 1/24 (* -1/720 (pow re 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 re re) #s(literal 1/24 binary64)) (*.f64 re re) #s(literal -1/2 binary64)) (*.f64 re re) #s(literal 1 binary64))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 im)
(neg.f64 im)
(+ (* -1 im) (* 1/2 (* im (pow re 2))))
(*.f64 im (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64)))
(+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))
(fma.f64 (*.f64 (*.f64 im (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))) re) re (neg.f64 im))
(+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2))))))))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64))) (*.f64 im (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))))
-1
#s(literal -1 binary64)
(- (* 1/2 (pow re 2)) 1)
(fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))
(- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)
(fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))
(- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(cos re)
(cos.f64 re)
(cos re)
(cos.f64 re)
(cos re)
(cos.f64 re)
(cos re)
(cos.f64 re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(* 1/2 (cos re))
(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
(cos re)
(cos.f64 re)
(cos re)
(cos.f64 re)
(cos re)
(cos.f64 re)
(cos re)
(cos.f64 re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* -1 (cos re))
(neg.f64 (cos.f64 re))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 #s(literal -1/6 binary64) im) im #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (*.f64 im im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
1
#s(literal 1 binary64)
(+ 1 (* -1 im))
(-.f64 #s(literal 1 binary64) im)
(+ 1 (* im (- (* 1/2 im) 1)))
(fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))
(+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal -1 binary64)) im #s(literal 1 binary64))
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
-1/60
#s(literal -1/60 binary64)
(- (* -1/2520 (pow im 2)) 1/60)
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(- (* -1/2520 (pow im 2)) 1/60)
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(- (* -1/2520 (pow im 2)) 1/60)
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
-1/3
#s(literal -1/3 binary64)
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
-2
#s(literal -2 binary64)
(- (* -1/3 (pow im 2)) 2)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(- (* -1/3 (pow im 2)) 2)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(- (* -1/3 (pow im 2)) 2)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
-1/3
#s(literal -1/3 binary64)
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
-2
#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 (*.f64 #s(literal -1/60 binary64) 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 (*.f64 #s(literal -1/60 binary64) 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 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1/2520 (pow im 2))
(*.f64 #s(literal -1/2520 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1/2520 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/2520 binary64))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* -1/3 (pow im 2))
(*.f64 #s(literal -1/3 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1/3 (pow im 3))
(*.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/3 binary64))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1/60 (pow im 2))
(*.f64 #s(literal -1/60 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1/60 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/60 binary64))
(* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #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 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1 im)
(neg.f64 im)
(* -1/2520 (pow im 2))
(*.f64 #s(literal -1/2520 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1/2520 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/2520 binary64))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* -1/3 (pow im 2))
(*.f64 #s(literal -1/3 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1/3 (pow im 3))
(*.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/3 binary64))
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* (pow im 3) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1/60 (pow im 2))
(*.f64 #s(literal -1/60 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1/60 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/60 binary64))
(* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #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)

rewrite158.0ms (0.4%)

Memory
10.5MiB live, 240.5MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
042255
070247
1240247
21420247
08471247
Stop Event
iter limit
node limit
iter limit
Counts
22 → 375
Calls
Call 1
Inputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
(cos.f64 re)
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
(*.f64 (neg.f64 (cos.f64 re)) im)
(neg.f64 (cos.f64 re))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp.f64 (neg.f64 im))
(neg.f64 im)
(fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64))
(fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
(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>

eval107.0ms (0.3%)

Memory
7.2MiB live, 210.9MiB allocated
Compiler

Compiled 17 176 to 2 343 computations (86.4% saved)

prune40.0ms (0.1%)

Memory
-20.5MiB live, 93.7MiB allocated
Pruning

22 alts after pruning (21 fresh and 1 done)

PrunedKeptTotal
New76720787
Fresh011
Picked415
Done000
Total77122793
Accuracy
100.0%
Counts
793 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
54.0%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (*.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)))) im)))
59.4%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
58.3%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
57.1%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
53.8%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
58.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 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
57.8%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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.2%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
59.5%
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #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)) #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)))
53.9%
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
51.3%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
40.7%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64))) im))
40.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
39.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))
35.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
36.6%
#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))
35.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (*.f64 (*.f64 im (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))) re) re (neg.f64 im))))
29.1%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
Compiler

Compiled 792 to 586 computations (26% saved)

simplify249.0ms (0.7%)

Memory
-16.7MiB live, 234.2MiB allocated
Algorithm
egg-herbie
Localize:

Found 19 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
054440
084433
1143433
2255433
3553433
41047433
51652433
62223433
72547433
82788433
92916433
102949433
113014433
123271433
133539433
145680433
157478433
167835433
177871433
187871433
08032433
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(*.f64 #s(literal -1/2520 binary64) im)
#s(literal -1/2520 binary64)
im
#s(literal -1/60 binary64)
(*.f64 im im)
#s(literal -1/3 binary64)
#s(literal -2 binary64)
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (neg (cos re)) im) (neg.f64 im))
(neg.f64 im)
im
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 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)
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
#s(literal 1/48 binary64)
(*.f64 re re)
re
#s(literal -1/4 binary64)
#s(literal 1/2 binary64)
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
#s(literal -1/3 binary64)
(*.f64 im im)
im
#s(literal -2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 im)
im
#s(literal 1/2 binary64)
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))
(*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(*.f64 (fma.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(*.f64 #s(literal -1/2520 binary64) im)
#s(literal -1/2520 binary64)
im
#s(literal -1/60 binary64)
(*.f64 im im)
#s(literal -1/3 binary64)
#s(literal -2 binary64)
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (neg (cos re)) im) (neg.f64 im))
(neg.f64 im)
im
(*.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 (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 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 (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #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)
(*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #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 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #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))
(fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64))
#s(literal -1/60 binary64)
(*.f64 im im)
im
#s(literal -1/3 binary64)
#s(literal -2 binary64)
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 re re) #s(literal 1/48 binary64) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 re re) #s(literal 1/48 binary64) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 (fma.f64 (*.f64 re re) #s(literal 1/48 binary64) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(fma.f64 (*.f64 re re) #s(literal 1/48 binary64) #s(literal -1/4 binary64))
#s(literal 1/48 binary64)
(*.f64 re re)
re
#s(literal -1/4 binary64)
#s(literal 1/2 binary64)
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
#s(literal -1/3 binary64)
(*.f64 im im)
im
#s(literal -2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
(exp.f64 im)
im
#s(literal 1/2 binary64)

localize200.0ms (0.6%)

Memory
10.4MiB live, 363.1MiB allocated
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
accuracy0
(exp.f64 im)
accuracy22.38419580696134
#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)))
accuracy29.3802590206245
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
accuracy31.875625689678365
#s(approx (exp (neg im)) #s(literal 1 binary64))
accuracy0.0625
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
accuracy0.08984375
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
accuracy10.425013864937169
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy31.376084837867293
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
accuracy0.0546875
(fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
accuracy0.23467766333128165
(fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64))
accuracy6.421102635059745
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy29.0584894938347
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
accuracy0
(neg.f64 im)
accuracy28.92891454283252
#s(approx (* (neg (cos re)) im) (neg.f64 im))
accuracy31.031189584504027
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
accuracy0.03515625
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
accuracy0.05859375
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
accuracy5.21975439948532
#s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
accuracy22.38419580696134
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
Samples
60.0ms80×1valid
58.0ms44×2valid
45.0ms132×0valid
Compiler

Compiled 292 to 48 computations (83.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 127.0ms
ival-mult: 37.0ms (29.2% of total)
ival-exp: 34.0ms (26.8% of total)
const: 15.0ms (11.8% of total)
ival-add: 14.0ms (11% of total)
adjust: 13.0ms (10.2% of total)
ival-cos: 6.0ms (4.7% of total)
ival-sub: 5.0ms (3.9% of total)
ival-neg: 2.0ms (1.6% of total)
exact: 1.0ms (0.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series30.0ms (0.1%)

Memory
18.4MiB live, 57.2MiB allocated
Counts
26 → 384
Calls
Call 1
Inputs
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<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 (*.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))) (patch (*.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))) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 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 (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())
#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<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 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())
#s(alt (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 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<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 (*.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))) (patch (*.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))) #<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)) #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)) #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)) #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)) #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)) #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)) #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)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/4 (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/48 (pow re 2)) 1/4) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/48 (pow re 2)) 1/4) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/48 (pow re 2)) 1/4) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (*.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))) (patch (*.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))) #<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)) #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)) #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)) #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)) #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)) #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)) #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)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos 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 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 4)) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 2)) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (*.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))) (patch (*.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))) #<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)) #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)) #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)) #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)) #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)) #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)) #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)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) (patch #s(approx (* 1/2 (cos 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 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 4)) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 2)) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<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 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<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 (*.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))) (patch (*.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))) #<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)) #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)) #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)) #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)) #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)) #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)) #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 (* -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 (* -2 im) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 im)) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* 1/2 im) 1))) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1))) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/60 (taylor 0 im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2520 (pow im 2)) 1/60) (taylor 0 im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2520 (pow im 2)) 1/60) (taylor 0 im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/2520 (pow im 2)) 1/60) (taylor 0 im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/3 (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/3 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/60 (pow im 2)) 1/3) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt -2 (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt -2 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/3 (pow im 2)) 2) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (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 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 7)) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 7) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 4))) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<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 (*.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))) (patch (*.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))) #<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)) #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)) #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)) #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)) #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)) #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)) #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 (- (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 5)) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60)) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60)) (taylor inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 4)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 4)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (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 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (patch (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 7)) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 7) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 7) (+ 1/2520 (+ (/ 1/3 (pow im 4)) (* 1/60 (/ 1 (pow im 2))))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 7) (+ 1/2520 (+ (/ 1/3 (pow im 4)) (+ (* 1/60 (/ 1 (pow im 2))) (* 2 (/ 1 (pow im 6)))))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<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 (*.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))) (patch (*.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))) #<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)) #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)) #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)) #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)) #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)) #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)) #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 (- (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 5)) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4)))))) (taylor -inf im) (#s(alt (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) (patch (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (patch (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2520 (pow im 4)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (patch (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 (pow im 4)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/3 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) (patch (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) #<representation binary64>) () ())) ())
#s(alt (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:

TimeVariablePointExpression
4.0ms
im
@-inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (* (+ (* (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (* -1/2520 im) im) -1/60) (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (exp im))
3.0ms
im
@inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (* (+ (* (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (* -1/2520 im) im) -1/60) (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (exp im))
2.0ms
re
@inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (* (+ (* (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (* -1/2520 im) im) -1/60) (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (exp im))
2.0ms
im
@0
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (* (+ (* (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (* -1/2520 im) im) -1/60) (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (exp im))
1.0ms
re
@-inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (* (+ (* (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (neg (cos re)) im) (neg im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im)) (* (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) im) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (+ (* (* -1/2520 im) im) -1/60) (+ (* (+ (* (* -1/2520 im) im) -1/60) (* im im)) -1/3) (+ (* -1/60 (* im im)) -1/3) (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (- (exp (- 0 im)) (exp im)) (+ (* -1/3 (* im im)) -2) (exp im))

simplify158.0ms (0.4%)

Memory
-1.0MiB live, 207.7MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02303871
16393697
220473648
349933594
081853420
Stop Event
iter limit
node limit
Counts
384 → 384
Calls
Call 1
Inputs
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (- (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 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
-1/4
(- (* 1/48 (pow re 2)) 1/4)
(- (* 1/48 (pow re 2)) 1/4)
(- (* 1/48 (pow re 2)) 1/4)
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (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/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/48 (pow re 4))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* 1/48 (pow re 2))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (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/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/48 (pow re 4))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* 1/48 (pow re 2))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 (* im (cos re)))
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 im)
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
1
(+ 1 (* -1 im))
(+ 1 (* im (- (* 1/2 im) 1)))
(+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))
-1/60
(- (* -1/2520 (pow im 2)) 1/60)
(- (* -1/2520 (pow im 2)) 1/60)
(- (* -1/2520 (pow im 2)) 1/60)
-1/3
(- (* -1/60 (pow im 2)) 1/3)
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
-1/3
(- (* -1/60 (pow im 2)) 1/3)
(- (* -1/60 (pow im 2)) 1/3)
(- (* -1/60 (pow im 2)) 1/3)
-2
(- (* -1/3 (pow im 2)) 2)
(- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)
(- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
-2
(- (* -1/3 (pow im 2)) 2)
(- (* -1/3 (pow im 2)) 2)
(- (* -1/3 (pow im 2)) 2)
1
(+ 1 im)
(+ 1 (* im (+ 1 (* 1/2 im))))
(+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* -1/2520 (pow im 7))
(* -1 (* (pow im 7) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* (pow im 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* (pow im 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 4))) (+ 1/2520 (* 1/60 (/ 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))))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* -1/60 (pow im 5))
(* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(* -1/2520 (pow im 2))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1/2520 (pow im 4))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* -1/60 (pow im 2))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1/60 (pow im 4))
(* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* -1/3 (pow im 2))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(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/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* -1/2520 (pow im 7))
(* -1 (* (pow im 7) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 7) (+ 1/2520 (+ (/ 1/3 (pow im 4)) (* 1/60 (/ 1 (pow im 2)))))))
(* -1 (* (pow im 7) (+ 1/2520 (+ (/ 1/3 (pow im 4)) (+ (* 1/60 (/ 1 (pow im 2))) (* 2 (/ 1 (pow im 6))))))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* -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))))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* -1/60 (pow im 5))
(* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4))))))
(* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4))))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(* -1/2520 (pow im 2))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* -1/2520 (pow im 4))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(* -1/60 (pow im 2))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* -1/60 (pow im 4))
(* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(* (pow im 4) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* -1/3 (pow im 2))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(exp im)
(exp im)
(exp im)
(exp im)
Outputs
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 im)
(neg.f64 im)
(+ (* -1 im) (* 1/2 (* im (pow re 2))))
(*.f64 im (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64)))
(+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))
(fma.f64 (*.f64 (*.f64 im (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))) re) re (neg.f64 im))
(+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2))))))))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64))) (*.f64 im (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow re 2)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow re 2)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow re 2)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
-1/4
#s(literal -1/4 binary64)
(- (* 1/48 (pow re 2)) 1/4)
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(- (* 1/48 (pow re 2)) 1/4)
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(- (* 1/48 (pow re 2)) 1/4)
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.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/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 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/48 (pow re 4))
(*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 1/48 binary64))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* 1/48 (pow re 2))
(*.f64 #s(literal 1/48 binary64) (*.f64 re re))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.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/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 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/48 (pow re 4))
(*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 1/48 binary64))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* 1/48 (pow re 2))
(*.f64 #s(literal 1/48 binary64) (*.f64 re re))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 im)
(neg.f64 im)
(* im (- (* -1/6 (pow im 2)) 1))
(*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 im)
(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 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 im)
(neg.f64 im)
(* im (- (* -1/6 (pow im 2)) 1))
(*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
1
#s(literal 1 binary64)
(+ 1 (* -1 im))
(-.f64 #s(literal 1 binary64) im)
(+ 1 (* im (- (* 1/2 im) 1)))
(fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))
(+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal -1 binary64)) im #s(literal 1 binary64))
-1/60
#s(literal -1/60 binary64)
(- (* -1/2520 (pow im 2)) 1/60)
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(- (* -1/2520 (pow im 2)) 1/60)
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(- (* -1/2520 (pow im 2)) 1/60)
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
-1/3
#s(literal -1/3 binary64)
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
-1/3
#s(literal -1/3 binary64)
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(- (* -1/60 (pow im 2)) 1/3)
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
-2
#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 (*.f64 #s(literal -1/60 binary64) 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 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
-2
#s(literal -2 binary64)
(- (* -1/3 (pow im 2)) 2)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(- (* -1/3 (pow im 2)) 2)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(- (* -1/3 (pow im 2)) 2)
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
1
#s(literal 1 binary64)
(+ 1 im)
(+.f64 #s(literal 1 binary64) im)
(+ 1 (* im (+ 1 (* 1/2 im))))
(fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal 1 binary64)) im #s(literal 1 binary64))
(+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) im #s(literal 1/2 binary64)) im #s(literal 1 binary64)) im #s(literal 1 binary64))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* -1/2520 (pow im 7))
(*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -1/2520 binary64))
(* -1 (* (pow im 7) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 7 binary64)))
(* (pow im 7) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)) (pow.f64 im #s(literal 7 binary64)))
(* (pow im 7) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 4))) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 7 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/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* -1/60 (pow im 5))
(*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/60 binary64))
(* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) (pow.f64 im #s(literal 5 binary64)))
(* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 im im))) im) im) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))
(* (pow im 5) (- (* -1 (/ (+ 1/3 (* 2 (/ 1 (pow im 2)))) (pow im 2))) 1/60))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/3 binary64) (/.f64 #s(literal 2 binary64) (*.f64 im im))) im) im) #s(literal 1/60 binary64)) (pow.f64 im #s(literal 5 binary64)))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(* -1/2520 (pow im 2))
(*.f64 #s(literal -1/2520 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1/2520 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/2520 binary64))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)))
(* -1/60 (pow im 2))
(*.f64 #s(literal -1/60 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1/60 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/60 binary64))
(* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #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 (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* -1/3 (pow im 2))
(*.f64 #s(literal -1/3 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* -1/2520 (pow im 7))
(*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -1/2520 binary64))
(* -1 (* (pow im 7) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 7 binary64)))
(* -1 (* (pow im 7) (+ 1/2520 (+ (/ 1/3 (pow im 4)) (* 1/60 (/ 1 (pow im 2)))))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal -1/3 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2520 binary64)) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 7 binary64)))
(* -1 (* (pow im 7) (+ 1/2520 (+ (/ 1/3 (pow im 4)) (+ (* 1/60 (/ 1 (pow im 2))) (* 2 (/ 1 (pow im 6))))))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal -1/3 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/2520 binary64)) (+.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal 1/60 binary64) (*.f64 im im)))) (pow.f64 im #s(literal 7 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/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* -1/60 (pow im 5))
(*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/60 binary64))
(* -1 (* (pow im 5) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) (pow.f64 im #s(literal 5 binary64)))
(* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4))))))
(*.f64 (-.f64 (/.f64 #s(literal -2 binary64) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 im im)) #s(literal 1/60 binary64))) (pow.f64 im #s(literal 5 binary64)))
(* -1 (* (pow im 5) (+ 1/60 (+ (* 1/3 (/ 1 (pow im 2))) (/ 2 (pow im 4))))))
(*.f64 (-.f64 (/.f64 #s(literal -2 binary64) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 #s(literal 1/3 binary64) (*.f64 im im)) #s(literal 1/60 binary64))) (pow.f64 im #s(literal 5 binary64)))
(* 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))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(* -1/2520 (pow im 2))
(*.f64 #s(literal -1/2520 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1 (* (pow im 2) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(* -1/2520 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/2520 binary64))
(* -1 (* (pow im 4) (+ 1/2520 (* 1/60 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/2520 binary64) (/.f64 #s(literal 1/60 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/60 (* 1/3 (/ 1 (pow im 2)))) (pow im 2))) 1/2520))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/60 binary64) (/.f64 #s(literal 1/3 binary64) (*.f64 im im))) im) im) #s(literal 1/2520 binary64)))
(* -1/60 (pow im 2))
(*.f64 #s(literal -1/60 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1 (* (pow im 2) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(* -1/60 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/60 binary64))
(* -1 (* (pow im 4) (+ 1/60 (* 1/3 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #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 (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(* -1/3 (pow im 2))
(*.f64 #s(literal -1/3 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(* -1 (* (pow im 2) (+ 1/3 (* 2 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)

rewrite155.0ms (0.4%)

Memory
-3.5MiB live, 225.8MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054379
084372
1293372
21827372
08382372
Stop Event
iter limit
node limit
iter limit
Counts
26 → 433
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64))
#s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
#s(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)
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* 1/2 (cos re)) #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)
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im))
#s(approx (exp (neg im)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64))
(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))
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))
(fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64))
(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>

eval104.0ms (0.3%)

Memory
27.2MiB live, 223.1MiB allocated
Compiler

Compiled 19 599 to 2 717 computations (86.1% saved)

prune71.0ms (0.2%)

Memory
-18.6MiB live, 139.7MiB allocated
Pruning

30 alts after pruning (27 fresh and 3 done)

PrunedKeptTotal
New80215817
Fresh41216
Picked325
Done011
Total80930839
Accuracy
100.0%
Counts
839 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
54.0%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (*.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)))) im)))
59.4%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
58.3%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
57.1%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
30.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 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
58.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 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
57.8%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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.2%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
58.4%
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
51.3%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
40.7%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64))) im))
40.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
3.3%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
39.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))
35.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
36.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
58.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
53.9%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
35.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (*.f64 (*.f64 im (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))) re) re (neg.f64 im))))
35.8%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
35.7%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
29.0%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
35.8%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
29.1%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
Compiler

Compiled 1 000 to 762 computations (23.8% saved)

simplify160.0ms (0.5%)

Memory
15.3MiB live, 172.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 3 (0.0ms)

IterNodesCost
061536
095530
1168530
2321530
3842524
41847524
53163524
64363524
75475524
86855524
97986524
08038524
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
#s(literal -1/5040 binary64)
(*.f64 im im)
im
#s(literal -1/120 binary64)
#s(literal -1/6 binary64)
#s(literal -1 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 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 (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (exp im) #s(literal 1 binary64))
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
#s(literal -1/120 binary64)
(*.f64 im im)
im
#s(literal -1/6 binary64)
#s(literal -1 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (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
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
#s(literal 1/48 binary64)
(*.f64 re re)
re
#s(literal -1/4 binary64)
#s(literal 1/2 binary64)
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(*.f64 #s(literal -1/60 binary64) im)
#s(literal -1/60 binary64)
im
#s(literal -1/3 binary64)
(*.f64 im im)
#s(literal -2 binary64)
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (fma.f64 (pow.f64 im #s(literal 5 binary64)) (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/6 binary64) (neg.f64 im)))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (fma.f64 (pow.f64 im #s(literal 5 binary64)) (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/6 binary64) (neg.f64 im))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(fma.f64 (pow.f64 im #s(literal 5 binary64)) (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/6 binary64) (neg.f64 im)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))
(fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 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)
#s(literal -1/6 binary64)
#s(literal -1 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 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 (exp (neg im)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (exp im) #s(literal 1 binary64))
#s(literal 1/2 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (fma.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/120 binary64) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/6 binary64) (neg.f64 im)))))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (fma.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/120 binary64) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/6 binary64) (neg.f64 im))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(fma.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -1/120 binary64) (fma.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal -1/6 binary64) (neg.f64 im)))
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
#s(literal -1/120 binary64)
(*.f64 im im)
im
#s(literal -1/6 binary64)
#s(literal -1 binary64)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (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
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) 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 (*.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)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
#s(literal 1/48 binary64)
(*.f64 re re)
re
#s(literal -1/4 binary64)
#s(literal 1/2 binary64)
#s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64))
(fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64))
(*.f64 #s(literal -1/60 binary64) im)
#s(literal -1/60 binary64)
im
#s(literal -1/3 binary64)
(*.f64 im im)
#s(literal -2 binary64)

localize320.0ms (0.9%)

Memory
-21.8MiB live, 616.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.08984375
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
accuracy0.09375
(*.f64 #s(literal -1/60 binary64) im)
accuracy6.421102635059745
#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))
accuracy31.376084837867293
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
accuracy0.1015625
(fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64))
accuracy0.12109375
(*.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)
accuracy31.031189584504027
#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))
accuracy31.297804505756698
#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)))
accuracy0.0546875
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
accuracy0.24350687865962586
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
accuracy6.421539041933941
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
accuracy22.38419580696134
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
accuracy22.38419580696134
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
accuracy29.3802590206245
(-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64)))
accuracy31.86472625490298
#s(approx (exp im) #s(literal 1 binary64))
accuracy31.875625689678365
#s(approx (exp (neg im)) #s(literal 1 binary64))
accuracy0.03515625
(fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))
accuracy0.49852985722522614
(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
accuracy5.22011921949132
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
accuracy22.38419580696134
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
Samples
112.0ms80×1valid
76.0ms44×2valid
64.0ms132×0valid
Compiler

Compiled 348 to 61 computations (82.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 211.0ms
ival-mult: 69.0ms (32.7% of total)
ival-exp: 53.0ms (25.1% of total)
const: 31.0ms (14.7% of total)
ival-add: 23.0ms (10.9% of total)
adjust: 19.0ms (9% of total)
ival-cos: 6.0ms (2.8% of total)
ival-sub: 5.0ms (2.4% of total)
ival-neg: 4.0ms (1.9% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series65.0ms (0.2%)

Memory
24.6MiB live, 107.8MiB allocated
Counts
25 → 372
Calls
Call 1
Inputs
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())
#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())
#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())
#s(alt #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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())
#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())
#s(alt (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 (exp im) #s(literal 1 binary64)) (patch #s(approx (exp 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 #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)) (patch #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)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im)))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im))))))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im)))))))) (taylor 0 re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4))) (taylor 0 re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (pow re 2))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4))) (taylor 0 re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/4 (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/48 (pow re 2)) 1/4) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/48 (pow re 2)) 1/4) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 1/48 (pow re 2)) 1/4) (taylor 0 re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/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/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 4)) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 2)) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor -inf re) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos re)) (taylor -inf re) (#s(alt #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) (patch #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 4)) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (patch (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/48 (pow re 2)) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2))))) (taylor -inf re) (#s(alt (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (patch (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt -1 (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/6 (pow im 2)) 1) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/6 (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/120 (pow im 2)) 1/6) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor 0 im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #<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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #<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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #<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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 im)) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* 1/2 im) 1))) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1))) (taylor 0 im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/6 (pow im 2)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)) (taylor 0 im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt -1 (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/6 (pow im 2)) 1) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1) (taylor 0 im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt -1/6 (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/120 (pow im 2)) 1/6) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/120 (pow im 2)) 1/6) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* -1/120 (pow im 2)) 1/6) (taylor 0 im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (cos re))) (taylor 0 im) (#s(alt #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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re))))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re))))))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re))))))))) (taylor 0 im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt -1/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 (taylor 0 im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 im) (taylor 0 im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* 1/2 im)))) (taylor 0 im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im)))))) (taylor 0 im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp 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 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 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)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* -1/3 (pow im 2)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2)) (taylor 0 im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor 0 im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor 0 im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor 0 im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor 0 im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/5040 (pow im 6)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 6) (+ 1/5040 (* 1/120 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 6) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 6) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 4))) (+ 1/5040 (* 1/120 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/5040 (pow im 4)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/5040 (* 1/120 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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 (neg im)) (taylor inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (neg im)) (exp im))) (taylor inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (pow im 4)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120)) (taylor inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (pow im 2)) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (neg im)) (exp im)))) (taylor inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<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 (exp im) (taylor inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp 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 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 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)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (neg im)) (exp im)) (taylor inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/5040 (pow im 6)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 6) (+ 1/5040 (* 1/120 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 6) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 6) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 4))) (+ 1/5040 (* 1/120 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/5040 (pow im 4)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/5040 (* 1/120 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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)) #s(approx (exp im) #s(literal 1 binary64))) (patch (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp 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 (* -1 im)) (taylor -inf im) (#s(alt #s(approx (exp (neg im)) #s(literal 1 binary64)) (patch #s(approx (exp (neg im)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (patch #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (exp (* -1 im)) (exp im))) (taylor -inf im) (#s(alt #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) (patch #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (pow im 4)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 4) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120)) (taylor -inf im) (#s(alt (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) (patch (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/120 (pow im 2)) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2)))))) (taylor -inf im) (#s(alt (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (patch (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im)))) (taylor -inf im) (#s(alt (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (patch (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) #<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 (exp im) (taylor -inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp im) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (exp im) (taylor -inf im) (#s(alt #s(approx (exp im) #s(literal 1 binary64)) (patch #s(approx (exp 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 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 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)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (- (exp (* -1 im)) (exp im)) (taylor -inf im) (#s(alt #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) (patch #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor -inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor -inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor -inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* -1/60 im) (taylor -inf im) (#s(alt (*.f64 #s(literal -1/60 binary64) im) (patch (*.f64 #s(literal -1/60 binary64) im) #<representation binary64>) () ())) ())
Calls

6 calls:

TimeVariablePointExpression
15.0ms
im
@-inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* im im)) -1) (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1) (+ (* -1/120 (* im im)) -1/6) (* (* 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))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (+ (* -1/5040 (* im im)) -1/120) (exp im) (+ (* 1/720 (* re re)) -1/24) (- (exp (- 0 im)) (exp im)) (* -1/60 im))
3.0ms
im
@inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* im im)) -1) (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1) (+ (* -1/120 (* im im)) -1/6) (* (* 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))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (+ (* -1/5040 (* im im)) -1/120) (exp im) (+ (* 1/720 (* re re)) -1/24) (- (exp (- 0 im)) (exp im)) (* -1/60 im))
2.0ms
re
@inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* im im)) -1) (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1) (+ (* -1/120 (* im im)) -1/6) (* (* 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))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (+ (* -1/5040 (* im im)) -1/120) (exp im) (+ (* 1/720 (* re re)) -1/24) (- (exp (- 0 im)) (exp im)) (* -1/60 im))
2.0ms
im
@0
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* im im)) -1) (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1) (+ (* -1/120 (* im im)) -1/6) (* (* 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))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (+ (* -1/5040 (* im im)) -1/120) (exp im) (+ (* 1/720 (* re re)) -1/24) (- (exp (- 0 im)) (exp im)) (* -1/60 im))
2.0ms
re
@-inf
((* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* im im)) -1) (+ (* (+ (* -1/5040 (* im im)) -1/120) (* im im)) -1/6) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (- (exp (neg im)) (exp im)) (exp (neg im)) (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (* (- (exp (neg im)) (exp im)) 1/2) (+ (* (+ (* -1/120 (* im im)) -1/6) (* im im)) -1) (+ (* -1/120 (* im im)) -1/6) (* (* 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))) (* 1/2 (cos re)) (+ (* (+ (* 1/48 (* re re)) -1/4) (* re re)) 1/2) (+ (* 1/48 (* re re)) -1/4) (+ (* -1/5040 (* im im)) -1/120) (exp im) (+ (* 1/720 (* re re)) -1/24) (- (exp (- 0 im)) (exp im)) (* -1/60 im))

simplify185.0ms (0.5%)

Memory
-23.1MiB live, 371.5MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02293814
16213640
218573593
342443543
080863380
Stop Event
iter limit
node limit
Counts
372 → 372
Calls
Call 1
Inputs
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* 1/2 (- (exp (neg im)) (exp im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(* -1 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
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
1/2
(+ 1/2 (* -1/4 (pow re 2)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
-1/4
(- (* 1/48 (pow re 2)) 1/4)
(- (* 1/48 (pow re 2)) 1/4)
(- (* 1/48 (pow re 2)) 1/4)
-1/24
(- (* 1/720 (pow re 2)) 1/24)
(- (* 1/720 (pow re 2)) 1/24)
(- (* 1/720 (pow re 2)) 1/24)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (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/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/48 (pow re 4))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* 1/48 (pow re 2))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* 1/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)))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (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/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/2 (cos re))
(* 1/48 (pow re 4))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(* 1/48 (pow re 2))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(* 1/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)))))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
-1
(- (* -1/6 (pow im 2)) 1)
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
(- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)
-1/6
(- (* -1/120 (pow im 2)) 1/6)
(- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)
(- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
1
(+ 1 (* -1 im))
(+ 1 (* im (- (* 1/2 im) 1)))
(+ 1 (* im (- (* im (+ 1/2 (* -1/6 im))) 1)))
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(* -1 im)
(* im (- (* -1/6 (pow im 2)) 1))
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
-1
(- (* -1/6 (pow im 2)) 1)
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
-1/6
(- (* -1/120 (pow im 2)) 1/6)
(- (* -1/120 (pow im 2)) 1/6)
(- (* -1/120 (pow im 2)) 1/6)
(* -1 (* im (cos re)))
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (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/120
(- (* -1/5040 (pow im 2)) 1/120)
(- (* -1/5040 (pow im 2)) 1/120)
(- (* -1/5040 (pow im 2)) 1/120)
1
(+ 1 im)
(+ 1 (* im (+ 1 (* 1/2 im))))
(+ 1 (* im (+ 1 (* im (+ 1/2 (* 1/6 im))))))
(* -2 im)
(* im (- (* -1/3 (pow im 2)) 2))
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(* -1/60 im)
(* -1/60 im)
(* -1/60 im)
(* -1/60 im)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* -1/5040 (pow im 6))
(* -1 (* (pow im 6) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(* (pow im 6) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(* (pow im 6) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 4))) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(* -1/5040 (pow im 4))
(* -1 (* (pow im 4) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(exp (neg im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(* -1/120 (pow im 4))
(* -1 (* (pow im 4) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(* -1/120 (pow im 2))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(* 1/2 (* (cos re) (- (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/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))))))
(exp im)
(exp im)
(exp im)
(exp im)
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(- (exp (neg im)) (exp im))
(* -1/60 im)
(* -1/60 im)
(* -1/60 im)
(* -1/60 im)
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* -1/5040 (pow im 6))
(* -1 (* (pow im 6) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(* (pow im 6) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(* (pow im 6) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 4))) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(* -1/5040 (pow im 4))
(* -1 (* (pow im 4) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(exp (* -1 im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(* -1/120 (pow im 4))
(* -1 (* (pow im 4) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(* -1/120 (pow im 2))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(* 1/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/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))))))
(exp im)
(exp im)
(exp im)
(exp im)
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(- (exp (* -1 im)) (exp im))
(* -1/60 im)
(* -1/60 im)
(* -1/60 im)
(* -1/60 im)
Outputs
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* -1 im)
(neg.f64 im)
(+ (* -1 im) (* 1/2 (* im (pow re 2))))
(*.f64 im (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64)))
(+ (* -1 im) (* (pow re 2) (+ (* -1/24 (* im (pow re 2))) (* 1/2 im))))
(fma.f64 (*.f64 (*.f64 im (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))) re) re (neg.f64 im))
(+ (* -1 im) (* (pow re 2) (+ (* 1/2 im) (* (pow re 2) (+ (* -1/24 im) (* 1/720 (* im (pow re 2))))))))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 im (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64))) (*.f64 im (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))))
-1
#s(literal -1 binary64)
(- (* 1/2 (pow re 2)) 1)
(fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))
(- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)
(fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))
(- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))
-1
#s(literal -1 binary64)
(- (* 1/2 (pow re 2)) 1)
(fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))
(- (* (pow re 2) (+ 1/2 (* -1/24 (pow re 2)))) 1)
(fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))
(- (* (pow re 2) (+ 1/2 (* (pow re 2) (- (* 1/720 (pow re 2)) 1/24)))) 1)
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(+ (* -1/4 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/2 (- (exp (neg im)) (exp im))))
(*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* 1/48 (* (pow re 2) (- (exp (neg im)) (exp im)))))))
(*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(+ (* 1/2 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/4 (- (exp (neg im)) (exp im))) (* (pow re 2) (+ (* -1/1440 (* (pow re 2) (- (exp (neg im)) (exp im)))) (* 1/48 (- (exp (neg im)) (exp im))))))))
(fma.f64 (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow re 2)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* (pow re 2) (+ 1/48 (* -1/1440 (pow re 2)))) 1/4)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (pow re 2)))
(fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(+ 1/2 (* (pow re 2) (- (* 1/48 (pow re 2)) 1/4)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
-1/4
#s(literal -1/4 binary64)
(- (* 1/48 (pow re 2)) 1/4)
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(- (* 1/48 (pow re 2)) 1/4)
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(- (* 1/48 (pow re 2)) 1/4)
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
-1/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/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.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/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 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #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))) (/ 1 (pow re 6)))))
(*.f64 (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/24 binary64) (*.f64 re re))) (/.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 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 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/48 (pow re 4))
(*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 1/48 binary64))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* 1/48 (pow re 2))
(*.f64 #s(literal 1/48 binary64) (*.f64 re re))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* 1/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)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.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/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 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #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))) (/ 1 (pow re 6)))))
(*.f64 (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/720 binary64)) (/.f64 #s(literal 1/24 binary64) (*.f64 re re))) (/.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 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 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/48 (pow re 4))
(*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 1/48 binary64))
(* (pow re 4) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* (pow re 4) (- (+ 1/48 (/ 1/2 (pow re 4))) (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 1/48 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(* 1/48 (pow re 2))
(*.f64 #s(literal 1/48 binary64) (*.f64 re re))
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* (pow re 2) (- 1/48 (* 1/4 (/ 1 (pow re 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/48 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 re re))) re) re)
(* 1/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)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 im)
(neg.f64 im)
(* im (- (* -1/6 (pow im 2)) 1))
(*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
-1
#s(literal -1 binary64)
(- (* -1/6 (pow im 2)) 1)
(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1)
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
-1/6
#s(literal -1/6 binary64)
(- (* -1/120 (pow im 2)) 1/6)
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)
(fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))
(- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)
(fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 im)
(neg.f64 im)
(* im (- (* -1/6 (pow im 2)) 1))
(*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.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 (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 im)
(neg.f64 im)
(* im (- (* -1/6 (pow im 2)) 1))
(*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/5040 (pow im 2)) 1/120)) 1/6)) 1))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)
-1
#s(literal -1 binary64)
(- (* -1/6 (pow im 2)) 1)
(fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64))
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(- (* (pow im 2) (- (* -1/120 (pow im 2)) 1/6)) 1)
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
-1/6
#s(literal -1/6 binary64)
(- (* -1/120 (pow im 2)) 1/6)
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(- (* -1/120 (pow im 2)) 1/6)
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(- (* -1/120 (pow im 2)) 1/6)
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* -1 (* im (cos re)))
(*.f64 (neg.f64 (cos.f64 re)) im)
(* im (+ (* -1 (cos re)) (* -1/6 (* (pow im 2) (cos re)))))
(*.f64 (*.f64 (cos.f64 re) im) (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)))
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* -1/120 (* (pow im 2) (cos re)))))))
(*.f64 (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))) im)
(* im (+ (* -1 (cos re)) (* (pow im 2) (+ (* -1/6 (cos re)) (* (pow im 2) (+ (* -1/120 (cos re)) (* -1/5040 (* (pow im 2) (cos re)))))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (*.f64 (cos.f64 re) (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))) (*.f64 (neg.f64 (cos.f64 re)) im))
-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
#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))
(* -2 im)
(*.f64 #s(literal -2 binary64) im)
(* im (- (* -1/3 (pow im 2)) 2))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* -1/60 (pow im 2)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* im (- (* (pow im 2) (- (* (pow im 2) (- (* -1/2520 (pow im 2)) 1/60)) 1/3)) 2))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* -1/5040 (pow im 6))
(*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/5040 binary64))
(* -1 (* (pow im 6) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 im im))) (pow.f64 im #s(literal 6 binary64)))
(* (pow im 6) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) im) im) #s(literal 1/5040 binary64)) (pow.f64 im #s(literal 6 binary64)))
(* (pow im 6) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 4))) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(*.f64 (-.f64 (-.f64 #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 im im))) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 6 binary64)))
(* -1/5040 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/5040 binary64))
(* -1 (* (pow im 4) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) im) im) #s(literal 1/5040 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) im) im) #s(literal 1/5040 binary64)))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (neg im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(exp (neg im))
(exp.f64 (neg.f64 im))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (neg im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* -1/120 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/120 binary64))
(* -1 (* (pow im 4) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im))) im) im) #s(literal 1/120 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im))) im) im) #s(literal 1/120 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* -1/120 (pow im 2))
(*.f64 #s(literal -1/120 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (neg im)) (exp im))))
(*.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/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))
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp 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/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* -1/5040 (pow im 6))
(*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/5040 binary64))
(* -1 (* (pow im 6) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 im im))) (pow.f64 im #s(literal 6 binary64)))
(* (pow im 6) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) im) im) #s(literal 1/5040 binary64)) (pow.f64 im #s(literal 6 binary64)))
(* (pow im 6) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 4))) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(*.f64 (-.f64 (-.f64 #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 im im))) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 1/6 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 6 binary64)))
(* -1/5040 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/5040 binary64))
(* -1 (* (pow im 4) (+ 1/5040 (* 1/120 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/5040 binary64) (/.f64 #s(literal 1/120 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) im) im) #s(literal 1/5040 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/120 (* 1/6 (/ 1 (pow im 2)))) (pow im 2))) 1/5040))
(*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) im) im) #s(literal 1/5040 binary64)))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(- (exp (* -1 im)) (exp im))
(-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(exp (* -1 im))
(exp.f64 (neg.f64 im))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (* (cos re) (- (exp (* -1 im)) (exp im))))
(*.f64 (cos.f64 re) (fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im))))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* 1/2 (- (exp (* -1 im)) (exp im)))
(fma.f64 #s(literal -1/2 binary64) (exp.f64 im) (/.f64 #s(literal 1/2 binary64) (exp.f64 im)))
(* -1/120 (pow im 4))
(*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/120 binary64))
(* -1 (* (pow im 4) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(*.f64 (-.f64 #s(literal -1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 im im))) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im))) im) im) #s(literal 1/120 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* (pow im 4) (- (* -1 (/ (+ 1/6 (/ 1 (pow im 2))) (pow im 2))) 1/120))
(*.f64 (-.f64 (/.f64 (/.f64 (-.f64 #s(literal -1/6 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im))) im) im) #s(literal 1/120 binary64)) (pow.f64 im #s(literal 4 binary64)))
(* -1/120 (pow im 2))
(*.f64 #s(literal -1/120 binary64) (*.f64 im im))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* -1 (* (pow im 2) (+ 1/120 (* 1/6 (/ 1 (pow im 2))))))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
(* 1/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/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))
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp im)
(exp.f64 im)
(exp 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/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)
(* -1/60 im)
(*.f64 #s(literal -1/60 binary64) im)

rewrite214.0ms (0.6%)

Memory
31.6MiB live, 466.6MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
061424
095418
1370418
22489418
08841418
Stop Event
iter limit
node limit
iter limit
Counts
25 → 304
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 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 (exp (neg im)) #s(literal 1 binary64))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))
(fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64))
(fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64))
#s(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))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64))
(fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64))
#s(approx (exp im) #s(literal 1 binary64))
(fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 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))
(*.f64 #s(literal -1/60 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>

eval130.0ms (0.4%)

Memory
-11.4MiB live, 282.1MiB allocated
Compiler

Compiled 16 256 to 2 122 computations (86.9% saved)

prune57.0ms (0.2%)

Memory
-0.7MiB live, 195.1MiB allocated
Pruning

34 alts after pruning (30 fresh and 4 done)

PrunedKeptTotal
New66511676
Fresh31922
Picked415
Done033
Total67234706
Accuracy
100.0%
Counts
706 → 34
Alt Table
Click to see full alt table
StatusAccuracyProgram
54.0%
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (*.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)))) im)))
59.4%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
57.1%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) re) re #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
58.3%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
30.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 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
58.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 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
57.8%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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)))
55.2%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
57.0%
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 #s(approx (+ (* 1/48 (* re re)) -1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 re re))) (*.f64 re re) #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)))
51.3%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (/.f64 (cos.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im))))
40.7%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64))) im))
8.9%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
40.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
3.3%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
51.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
39.0%
#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))
35.6%
#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))
36.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
59.5%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
58.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
53.9%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
58.4%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
35.6%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (fma.f64 (*.f64 (*.f64 im (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64))) re) re (neg.f64 im))))
35.8%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
35.7%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
29.0%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
35.8%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
29.1%
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
Compiler

Compiled 1 546 to 720 computations (53.4% saved)

regimes163.0ms (0.5%)

Memory
5.4MiB live, 310.4MiB allocated
Counts
53 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(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 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.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 #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 #s(approx (+ (* 1/48 (* re re)) -1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 re re))) (*.f64 re re) #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) re) re #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#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)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (*.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)))) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (/.f64 (neg.f64 (pow.f64 (cos.f64 re) #s(literal 3 binary64))) (fma.f64 (cos.f64 re) (cos.f64 re) #s(literal 0 binary64))) im))
Outputs
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
Calls

6 calls:

62.0ms
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
37.0ms
re
18.0ms
(cos.f64 re)
16.0ms
im
13.0ms
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
Results
AccuracySegmentsBranch
91.8%1re
99.9%2im
99.9%3(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
91.8%1(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
91.8%1(cos.f64 re)
99.9%2(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes53.0ms (0.1%)

Memory
10.1MiB live, 164.2MiB allocated
Counts
51 → 3
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(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 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.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 #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 #s(approx (+ (* 1/48 (* re re)) -1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 re re))) (*.f64 re re) #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) re) re #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#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)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* (+ (* -1/60 (* im im)) -1/3) (* im im)) -2) (*.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)))) 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 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
Calls

3 calls:

21.0ms
(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
17.0ms
im
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
AccuracySegmentsBranch
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)))
98.4%3im
91.8%1(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
Compiler

Compiled 20 to 20 computations (0% saved)

regimes17.0ms (0%)

Memory
-8.3MiB live, 75.0MiB allocated
Counts
49 → 3
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(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 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.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 #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 #s(approx (+ (* 1/48 (* re re)) -1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 re re))) (*.f64 re re) #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) re) re #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#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)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal 1/2 binary64)))
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
Calls

1 calls:

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

regimes150.0ms (0.4%)

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

6 calls:

49.0ms
im
43.0ms
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
20.0ms
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
13.0ms
re
11.0ms
(cos.f64 re)
Results
AccuracySegmentsBranch
71.5%2re
83.0%2(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
76.0%3(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
76.0%3(cos.f64 re)
86.5%4im
94.8%3(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Compiler

Compiled 27 to 30 computations (-11.1% saved)

regimes337.0ms (0.9%)

Memory
-230.0MiB live, 154.9MiB allocated
Counts
42 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(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 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.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 #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 #s(approx (+ (* 1/48 (* re re)) -1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 re re))) (*.f64 re re) #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) re) re #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
Calls

5 calls:

22.0ms
im
13.0ms
(cos.f64 re)
11.0ms
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
10.0ms
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
9.0ms
(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
Results
AccuracySegmentsBranch
72.4%2(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
72.4%2(cos.f64 re)
61.4%2(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
64.9%4im
72.4%2(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Compiler

Compiled 26 to 28 computations (-7.7% saved)

regimes40.0ms (0.1%)

Memory
-3.7MiB live, 74.0MiB allocated
Counts
41 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 im im) #s(literal -1/5040 binary64) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 im im) #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) im) im #s(literal -1/120 binary64)) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal 1/720 binary64) (*.f64 re re) #s(literal -1/24 binary64)) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 #s(approx (+ (* -1/3 (* im im)) -2) (*.f64 #s(literal -1/3 binary64) (*.f64 im im))) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(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 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.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 #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 im im) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) #s(literal -1/3 binary64)) im) im) im (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 #s(approx (+ (* 1/48 (* re re)) -1/4) (*.f64 #s(literal 1/48 binary64) (*.f64 re re))) (*.f64 re re) #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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.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)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) re) re #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/60 binary64) im) im #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (- (exp (neg im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)))) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2520 binary64) im) im #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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))
Calls

3 calls:

14.0ms
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
13.0ms
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
11.0ms
(cos.f64 re)
Results
AccuracySegmentsBranch
72.0%2(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
72.0%2(cos.f64 re)
72.0%2(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes30.0ms (0.1%)

Memory
-18.4MiB live, 55.2MiB allocated
Counts
20 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
Outputs
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
Calls

4 calls:

9.0ms
(cos.f64 re)
6.0ms
re
6.0ms
(*.f64 #s(literal 1/2 binary64) (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
AccuracySegmentsBranch
62.1%2re
71.0%2(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
71.0%2(cos.f64 re)
70.9%2(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Compiler

Compiled 19 to 21 computations (-10.5% saved)

regimes17.0ms (0%)

Memory
34.9MiB live, 34.9MiB allocated
Counts
19 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 im)) (neg.f64 (*.f64 im im))))))
Outputs
(*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
Calls

3 calls:

6.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
AccuracySegmentsBranch
69.8%2(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
69.9%2(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
69.9%2(cos.f64 re)
Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes48.0ms (0.1%)

Memory
-16.3MiB live, 25.3MiB allocated
Counts
17 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (*.f64 (neg.f64 (neg.f64 (*.f64 im im))) (/.f64 #s(literal 1 binary64) (neg.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) im) im #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(literal -1/24 binary64) (*.f64 re re) #s(literal 1/2 binary64)) (*.f64 re re) #s(literal -1 binary64))) im))
#s(approx (* (* 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) (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))))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/60 binary64) #s(literal -1/3 binary64)) im) im #s(literal -2 binary64)) im)))
(*.f64 #s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64)) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 #s(literal -1/60 binary64) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im)))
Calls

3 calls:

37.0ms
(cos.f64 re)
5.0ms
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
4.0ms
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Results
AccuracySegmentsBranch
68.3%2(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
68.4%2(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
68.4%2(cos.f64 re)
Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes9.0ms (0%)

Memory
17.2MiB live, 17.2MiB allocated
Counts
8 → 2
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (/.f64 (neg.f64 (*.f64 im im)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) (fma.f64 (fma.f64 im #s(literal 1/2 binary64) #s(literal -1 binary64)) im #s(literal 1 binary64))) #s(approx (exp im) #s(literal 1 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 #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 #s(literal 1 binary64) (neg.f64 im)))))
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
Calls

3 calls:

3.0ms
(cos.f64 re)
3.0ms
(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
3.0ms
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
Results
AccuracySegmentsBranch
63.9%2(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
64.0%2(*.f64 #s(literal 1/2 binary64) (cos.f64 re))
64.0%2(cos.f64 re)
Compiler

Compiled 18 to 19 computations (-5.6% saved)

regimes14.0ms (0%)

Memory
-8.8MiB live, 27.1MiB allocated
Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) #s(approx (exp im) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
Outputs
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
Calls

6 calls:

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

Compiled 27 to 30 computations (-11.1% saved)

regimes12.0ms (0%)

Memory
-8.5MiB live, 27.8MiB allocated
Accuracy

Total -16.8b remaining (-37%)

Threshold costs -16.8b (-37%)

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

6 calls:

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

Compiled 27 to 30 computations (-11.1% saved)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-inf
-2.4284067201563175e-8
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory
2.7MiB live, 2.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.309366699070273e-9
+inf
0.0ms
-inf
-1.2516308072554316e-14
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.309366699070273e-9
+inf
0.0ms
-inf
-1.2516308072554316e-14
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.309366699070273e-9
+inf
0.0ms
-inf
-1.2516308072554316e-14
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory
1.5MiB live, 1.5MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.0
4.309366699070273e-9
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.0
4.309366699070273e-9
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.022618152124983207
-0.007592525594224025
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.022618152124983207
-0.007592525594224025
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.022618152124983207
-0.007592525594224025
Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-0.022618152124983207
-0.007592525594224025
Compiler

Compiled 15 to 16 computations (-6.7% saved)

simplify40.0ms (0.1%)

Memory
-23.8MiB live, 96.6MiB allocated
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0130937
1162937
2175937
3182937
4184937
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -inf.0 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 (neg.f64 (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 -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 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 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (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 -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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)))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))
Outputs
(if (<=.f64 (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)) #s(literal -inf.0 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 (neg.f64 (cos.f64 re)) im)))
(if (<=.f64 (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) #s(literal -inf.0 binary64)) (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 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 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))))
(if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (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 -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))))
(if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (-.f64 #s(approx (exp (neg im)) #s(literal 1 binary64)) (exp.f64 im)) #s(literal 1/2 binary64))) (if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re))) (*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal -inf.0 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 (cos.f64 re)) im)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)))))
(if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal -inf.0 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 #s(literal 1/48 binary64) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))) (if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 3022314549036573/604462909807314587353088 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 (neg.f64 im) (cos.f64 re))) (*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/1440 binary64) (*.f64 re re) #s(literal 1/48 binary64)) (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 re re) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im))))
(if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) (*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2520 binary64) (*.f64 im im) #s(literal -1/60 binary64)) (*.f64 im im) #s(literal -1/3 binary64)) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) (fma.f64 (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)))))
(if (<=.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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)))
(if (<=.f64 (*.f64 (*.f64 (cos.f64 re) #s(literal 1/2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) #s(literal 0 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (fma.f64 #s(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)))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) (*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (fma.f64 #s(approx (+ (* -1/5040 (* im im)) -1/120) (*.f64 #s(literal -1/5040 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1/6 binary64)) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) (*.f64 #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) (*.f64 #s(approx (- (exp (- 0 im)) (exp im)) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 im im) #s(literal -2 binary64)) im)) #s(approx (* 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 #s(approx (+ (* -1/120 (* im im)) -1/6) (*.f64 #s(literal -1/120 binary64) (*.f64 im im))) (*.f64 im im) #s(literal -1 binary64)) im))))
(if (<=.f64 (cos.f64 re) #s(literal -5764607523034235/288230376151711744 binary64)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(approx (neg (cos re)) (fma.f64 (*.f64 re re) #s(literal 1/2 binary64) #s(literal -1 binary64))) im)) #s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (- (exp (neg im)) (exp im)) 1/2) (*.f64 (fma.f64 (*.f64 im im) #s(literal -1/6 binary64) #s(literal -1 binary64)) im)))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* (neg (cos re)) im) (neg.f64 im)))

soundness28.2s (79.3%)

Memory
10.6MiB live, 1 169.3MiB allocated
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02293814
16213640
218573593
342443543
080863380
01993245
15603071
217663032
339752980
081132822
02303871
16393697
220473648
349933594
081853420
0126650
1321616
2909610
32943589
46409589
08371556
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 873 to 429 computations (50.9% saved)

preprocess198.0ms (0.6%)

Memory
-3.1MiB live, 353.7MiB allocated
Remove

(abs re)

Compiler

Compiled 1 338 to 378 computations (71.7% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...