Metrics for math.sin on complex, imaginary part

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated; 0ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 14 to 13 computations (7.1% saved)

sample2.1s (39.1%)

Memory

43.2MiB live, 2 972.0MiB allocated; 692ms collecting garbage

Samples

789.0ms	1 646×	2	valid
500.0ms	2 361×	1	valid
493.0ms	4 249×	0	valid

Precisions

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

ival-exp: 852.0ms (55.7% of total)

ival-cos: 324.0ms (21.2% of total)

ival-mult!: 158.0ms (10.3% of total)

adjust: 120.0ms (7.8% of total)

ival-sub!: 76.0ms (5% of total)

Bogosity

preprocess52.0ms (1%)

Memory

7.5MiB live, 100.5MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	30	72
1	170	66

Stop Event

1×	iter-limit
1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs re)

Compiler

Compiled 24 to 22 computations (8.3% saved)

series102.0ms (1.9%)

Memory

15.1MiB live, 160.1MiB allocated; 15ms collecting garbage

Counts

11 → 38

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

Calls

6 calls:

Time	Variable	Point
1.0ms	im	0
1.0ms	re	inf
1.0ms	im	-inf
1.0ms	im	inf
1.0ms	re	-inf

rewrite208.0ms (3.8%)

Memory

0.0MiB live, 346.5MiB allocated; 58ms collecting garbage

Counts

11 → 48

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

eval12.0ms (0.2%)

Memory: -16.6MiB live, 28.4MiB allocated; 4ms collecting garbage
Compiler: Compiled 1 745 to 437 computations (75% saved)

prune5.0ms (0.1%)

Memory

16.0MiB live, 16.0MiB allocated; 0ms collecting garbage

Pruning

5 alts after pruning (5 fresh and 0 done)

	Pruned	Kept	Total
New	76	5	81
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	77	5	82

Accuracy

99.9%

Counts

82 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) (cos.f64 re)) #s(literal 1/2 binary64))
▶	51.4%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 (+.f64 (exp.f64 (neg.f64 (+.f64 im im))) (+.f64 (exp.f64 (+.f64 im im)) #s(literal 1 binary64))) (/.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) (+.f64 (exp.f64 (neg.f64 (+.f64 im im))) (+.f64 (exp.f64 (+.f64 im im)) #s(literal 1 binary64))))))
▶	41.2%	(.f64 #s(approx ( 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 2 binary64))))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
▶	38.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
▶	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))

Compiler

Compiled 212 to 162 computations (23.6% saved)

series175.0ms (3.2%)

Memory

-21.8MiB live, 266.5MiB allocated; 80ms collecting garbage

Counts

40 → 99

Calls

Call 1

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

Outputs
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (+.f64 (exp.f64 (neg.f64 im)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (+.f64 (exp.f64 (neg.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))))) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (+.f64 (exp.f64 (neg.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/24 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))))) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 2 binary64)))))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx re re)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))))))
#s(approx (* -1 (* im (cos re))) (*.f64 #s(literal -1 binary64) im))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) im)))))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) im (.f64 #s(literal 1/720 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))))))
#s(approx (* im (cos re)) im)
#s(approx (* im (cos re)) (+.f64 im (.f64 #s(literal -1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))
#s(approx (* im (cos re)) (+.f64 im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) im (.f64 #s(literal 1/24 binary64) (*.f64 im (pow.f64 re #s(literal 2 binary64))))))))
#s(approx (* im (cos re)) (+.f64 im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) im)))))))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/4 binary64)))))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/1440 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))
#s(approx (* -1/4 (pow re 2)) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 2 binary64))))
#s(approx (pow re 2) (pow.f64 re #s(literal 2 binary64)))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (*.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))
#s(approx (* -1 (* im (cos re))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))
#s(approx (* im (cos re)) (*.f64 im (cos.f64 re)))
#s(approx (* 1/2 (cos re)) (*.f64 #s(literal 1/2 binary64) (cos.f64 re)))
#s(approx (+ 1/2 (* -1/4 (pow re 2))) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 2 binary64)))) #s(literal 1/4 binary64))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 #s(literal -1/120 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 re) (.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 #s(literal -2 binary64) (.f64 im (cos.f64 re))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 im (fma.f64 #s(literal -2 binary64) (cos.f64 re) (.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 im (fma.f64 #s(literal -2 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (cos.f64 re) (.f64 #s(literal -1/60 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 im (fma.f64 #s(literal -2 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/60 binary64) (cos.f64 re) (.f64 #s(literal -1/2520 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))))
#s(approx (* 2 (sinh (neg im))) (*.f64 #s(literal -2 binary64) im))
#s(approx (* 2 (sinh (neg im))) (.f64 im (-.f64 (.f64 #s(literal -1/3 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (* 2 (sinh (neg im))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/60 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (* 2 (sinh (neg im))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2520 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) im)))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)))))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) im))) #s(literal 1 binary64)))))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) im)))))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) im)))))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 im #s(literal 2 binary64)))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 3 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 #s(literal 4/3 binary64) (pow.f64 im #s(literal 2 binary64)))))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 3 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 4/3 binary64) (*.f64 #s(literal 8/45 binary64) (pow.f64 im #s(literal 2 binary64)))))))))
#s(approx (exp (neg (+ im im))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) im)))
#s(approx (exp (neg (+ im im))) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 #s(literal 2 binary64) im) #s(literal 2 binary64)))))
#s(approx (exp (neg (+ im im))) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -4/3 binary64) im))) #s(literal 2 binary64)))))
#s(approx (+ im im) (*.f64 #s(literal 2 binary64) im))
#s(approx (+ (exp (+ im im)) 1) #s(literal 2 binary64))
#s(approx (+ (exp (+ im im)) 1) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)))
#s(approx (+ (exp (+ im im)) 1) (+.f64 #s(literal 2 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) im)))))
#s(approx (+ (exp (+ im im)) 1) (+.f64 #s(literal 2 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4/3 binary64) im)))))))
#s(approx (exp (+ im im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) im)))
#s(approx (exp (+ im im)) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) im)))))
#s(approx (exp (+ im im)) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 4/3 binary64) im)))))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (*.f64 #s(literal -2/3 binary64) im))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (.f64 im (-.f64 (.f64 #s(literal 7/9 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 2/3 binary64))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 7/9 binary64) (*.f64 #s(literal -403/540 binary64) (pow.f64 im #s(literal 2 binary64))))) #s(literal 2/3 binary64))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 7/9 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 5207/7560 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 403/540 binary64))))) #s(literal 2/3 binary64))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (exp im) (exp.f64 im))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal 2 binary64) im))) (exp.f64 (.f64 #s(literal 2 binary64) im)))))
#s(approx (exp (neg (+ im im))) (exp.f64 (neg.f64 (*.f64 #s(literal 2 binary64) im))))
#s(approx (+ (exp (+ im im)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal 2 binary64) im))))
#s(approx (exp (+ im im)) (exp.f64 (*.f64 #s(literal 2 binary64) im)))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (/.f64 (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal 2 binary64) im))) (exp.f64 (.f64 #s(literal 2 binary64) im))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 (cos.f64 re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* 2 (sinh (neg im))) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))))
#s(approx (sinh (neg im)) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (*.f64 #s(literal -1 binary64) im)) (exp.f64 im)))))
#s(approx (* 1/2 (- (exp (neg im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (exp.f64 im))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (*.f64 #s(literal -1 binary64) im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (*.f64 #s(literal -1 binary64) im)))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal -2 binary64) im))) (exp.f64 (.f64 #s(literal -2 binary64) im)))))
#s(approx (exp (neg (+ im im))) (exp.f64 (*.f64 #s(literal -2 binary64) im)))
#s(approx (+ (exp (+ im im)) 1) (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 (*.f64 #s(literal -2 binary64) im)))))
#s(approx (exp (+ im im)) (exp.f64 (neg.f64 (*.f64 #s(literal -2 binary64) im))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (/.f64 (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal -2 binary64) im))) (exp.f64 (.f64 #s(literal -2 binary64) im))))))

Calls

6 calls:

Time	Variable	Point
10.0ms	im	inf
7.0ms	re	0
5.0ms	im	0
5.0ms	im	-inf
3.0ms	re	inf

rewrite221.0ms (4.1%)

Memory

-21.4MiB live, 364.0MiB allocated; 38ms collecting garbage

Counts

40 → 173

Calls

Call 1

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

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

eval22.0ms (0.4%)

Memory: 9.5MiB live, 55.2MiB allocated; 4ms collecting garbage
Compiler: Compiled 6 185 to 951 computations (84.6% saved)

prune12.0ms (0.2%)

Memory

32.1MiB live, 32.1MiB allocated; 0ms collecting garbage

Pruning

16 alts after pruning (14 fresh and 2 done)

	Pruned	Kept	Total
New	180	14	194
Fresh	0	0	0
Picked	3	2	5
Done	0	0	0
Total	183	16	199

Accuracy

99.9%

Counts

199 → 16

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) (cos.f64 re)) #s(literal 1/2 binary64))
	64.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (cos re) #s(literal 1 binary64))) #s(literal 1/2 binary64))
	99.5%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 (+.f64 (exp.f64 (neg.f64 (+.f64 im im))) (+.f64 (exp.f64 (+.f64 im im)) #s(literal 1 binary64))) #s(approx (/ ( 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (*.f64 #s(literal -2/3 binary64) im))))
▶	99.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)))))
	2.8%	(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
▶	41.9%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 re #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	2.7%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 re #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))
	41.2%	(.f64 #s(approx ( 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) re) re))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 (.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
▶	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
	22.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
▶	21.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) im))) (exp.f64 im))))
✓	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))
▶	31.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) #s(approx ( im (cos re)) im)))
	39.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64)))))))

Compiler

Compiled 627 to 504 computations (19.6% saved)

series140.0ms (2.6%)

Memory

-1.6MiB live, 170.3MiB allocated; 46ms collecting garbage

Counts

37 → 76

Calls

Call 1

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

Outputs
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))))))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))))))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/4 binary64)))))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/1440 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 2 binary64)))))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx re re)
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))))))
#s(approx (* -1 (* im (cos re))) (*.f64 #s(literal -1 binary64) im))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) im)))))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) im (.f64 #s(literal 1/720 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))))))
#s(approx (* im (cos re)) im)
#s(approx (* im (cos re)) (+.f64 im (.f64 #s(literal -1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))
#s(approx (* im (cos re)) (+.f64 im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) im (.f64 #s(literal 1/24 binary64) (*.f64 im (pow.f64 re #s(literal 2 binary64))))))))
#s(approx (* im (cos re)) (+.f64 im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) im)))))))
#s(approx (+ (* re -1/4) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) re)))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))
#s(approx (* 1/2 (cos re)) (*.f64 #s(literal 1/2 binary64) (cos.f64 re)))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))
#s(approx (* -1 (* im (cos re))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))
#s(approx (* im (cos re)) (*.f64 im (cos.f64 re)))
#s(approx (+ (* re -1/4) 1/2) (*.f64 #s(literal -1/4 binary64) re))
#s(approx (+ (* re -1/4) 1/2) (.f64 re (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re)) #s(literal 1/4 binary64))))
#s(approx (+ (* re -1/4) 1/2) (.f64 #s(literal -1 binary64) (.f64 re (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re))))))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 #s(literal -1/120 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 re) (.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))))
#s(approx (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)))) (*.f64 #s(literal -2 binary64) im))
#s(approx (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)))) (.f64 im (-.f64 (.f64 #s(literal -1/3 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/60 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2520 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal 4 binary64) (pow.f64 im #s(literal 2 binary64)))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 3 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 #s(literal 4/3 binary64) (pow.f64 im #s(literal 2 binary64)))))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 3 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 4 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 4/3 binary64) (*.f64 #s(literal 8/45 binary64) (pow.f64 im #s(literal 2 binary64)))))))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (*.f64 #s(literal -2/3 binary64) im))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (.f64 im (-.f64 (.f64 #s(literal 7/9 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 2/3 binary64))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 7/9 binary64) (*.f64 #s(literal -403/540 binary64) (pow.f64 im #s(literal 2 binary64))))) #s(literal 2/3 binary64))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 7/9 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 5207/7560 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 403/540 binary64))))) #s(literal 2/3 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) im)))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)))))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) im))) #s(literal 1 binary64)))))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) im)))))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) im)))))))
#s(approx (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)))) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal 2 binary64) im))) (exp.f64 (.f64 #s(literal 2 binary64) im)))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (/.f64 (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal 2 binary64) im))) (exp.f64 (.f64 #s(literal 2 binary64) im))))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (+ 1 (* -1 im)) (*.f64 im (-.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64))))
#s(approx (exp im) (exp.f64 im))
#s(approx (* (* 1/2 (cos re)) (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))))))
#s(approx (* (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)))) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))))
#s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal -2 binary64) im))) (exp.f64 (.f64 #s(literal -2 binary64) im)))))
#s(approx (/ (* 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (/.f64 (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))) (+.f64 #s(literal 1 binary64) (+.f64 (exp.f64 (neg.f64 (.f64 #s(literal -2 binary64) im))) (exp.f64 (.f64 #s(literal -2 binary64) im))))))
#s(approx (sinh (neg im)) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (*.f64 #s(literal -1 binary64) im)) (exp.f64 im)))))
#s(approx (* 1/2 (- (exp (neg im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (exp.f64 im))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (*.f64 #s(literal -1 binary64) im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (*.f64 #s(literal -1 binary64) im)))
#s(approx (+ 1 (* -1 im)) (.f64 #s(literal -1 binary64) (.f64 im (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)))))

Calls

6 calls:

Time	Variable	Point
3.0ms	re	-inf
3.0ms	im	inf
3.0ms	im	-inf
2.0ms	re	inf
2.0ms	im	0

rewrite294.0ms (5.4%)

Memory

-24.8MiB live, 333.8MiB allocated; 217ms collecting garbage

Counts

37 → 115

Calls

Call 1

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

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

eval22.0ms (0.4%)

Memory: 7.9MiB live, 58.1MiB allocated; 10ms collecting garbage
Compiler: Compiled 4 544 to 640 computations (85.9% saved)

prune20.0ms (0.4%)

Memory

10.0MiB live, 56.6MiB allocated; 3ms collecting garbage

Pruning

24 alts after pruning (18 fresh and 6 done)

	Pruned	Kept	Total
New	104	11	115
Fresh	2	7	9
Picked	1	4	5
Done	0	2	2
Total	107	24	131

Accuracy

99.9%

Counts

131 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) (cos.f64 re)) #s(literal 1/2 binary64))
▶	64.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (cos re) #s(literal 1 binary64))) #s(literal 1/2 binary64))
✓	99.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)))))
	53.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) #s(approx (/ ( 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (*.f64 #s(literal -2/3 binary64) im))))
	2.8%	(*.f64 (cos.f64 re) #s(literal 1/2 binary64))
	26.8%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 re #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))
▶	2.7%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 re #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))
	41.2%	(.f64 #s(approx ( 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) re) re))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	16.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* re -1/4) 1/2) (*.f64 #s(literal -1/4 binary64) re))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	64.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)))))
✓	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 2 binary64) #s(approx (neg (cos re)) #s(literal 2 binary64))))
	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
	22.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
✓	21.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) im))) (exp.f64 im))))
▶	17.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) im))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) im))))))))
	5.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) im))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
	21.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) #s(approx (+ 1 ( -1 im)) (*.f64 im (-.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64))))) (exp.f64 im))))
	19.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx 2 #s(literal 2 binary64)) (exp.f64 im))))
	3.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx 2 #s(literal 2 binary64)) #s(literal 2 binary64))))
✓	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))
✓	31.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) #s(approx ( im (cos re)) im)))
▶	2.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal -1 binary64) #s(approx (neg (cos re)) #s(literal 2 binary64))))
▶	39.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64)))))))

Compiler

Compiled 993 to 772 computations (22.3% saved)

series181.0ms (3.3%)

Memory

2.3MiB live, 379.6MiB allocated; 34ms collecting garbage

Counts

36 → 87

Calls

Call 1

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

Outputs
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (+.f64 (exp.f64 (neg.f64 im)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (+.f64 (exp.f64 (neg.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))))) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (-.f64 (+.f64 (exp.f64 (neg.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))) (.f64 #s(literal 1/24 binary64) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))))) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))
#s(approx (cos re) #s(literal 1 binary64))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 2 binary64)))))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos re) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (fma.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im))) (.f64 #s(literal 1/48 binary64) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))))))
#s(approx (neg (cos re)) #s(literal -1 binary64))
#s(approx (neg (cos re)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/24 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (neg (cos re)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))
#s(approx (* 1/2 (cos re)) #s(literal 1/2 binary64))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 2 binary64)))))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1/4 binary64)))))
#s(approx (* 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/1440 binary64) (pow.f64 re #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))
#s(approx (+ (* re -1/4) 1/2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) re)))
#s(approx re re)
#s(approx (* -1 (* im (cos re))) (*.f64 #s(literal -1 binary64) im))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) im)))))
#s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) im (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) im (.f64 #s(literal 1/720 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64))))))))))
#s(approx (* 1/2 (* im (pow re 2))) (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 re #s(literal 2 binary64)))))
#s(approx (* im (pow re 2)) (*.f64 im (pow.f64 re #s(literal 2 binary64))))
#s(approx (pow re 2) (pow.f64 re #s(literal 2 binary64)))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im)))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (*.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (/.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 im))))))
#s(approx (cos re) (cos.f64 re))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))))
#s(approx (neg (cos re)) (*.f64 #s(literal -1 binary64) (cos.f64 re)))
#s(approx (* 1/2 (cos re)) (*.f64 #s(literal 1/2 binary64) (cos.f64 re)))
#s(approx (+ (* re -1/4) 1/2) (*.f64 #s(literal -1/4 binary64) re))
#s(approx (+ (* re -1/4) 1/2) (.f64 re (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re)) #s(literal 1/4 binary64))))
#s(approx (* -1 (* im (cos re))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))
#s(approx (+ (* -1 im) (* 1/2 (* im (pow re 2)))) (.f64 (pow.f64 re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 im (pow.f64 re #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) im))))
#s(approx (+ (* re -1/4) 1/2) (.f64 #s(literal -1 binary64) (.f64 re (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 #s(literal -1/120 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 im (fma.f64 #s(literal -1 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 re) (.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 #s(literal -2 binary64) (.f64 im (cos.f64 re))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 im (fma.f64 #s(literal -2 binary64) (cos.f64 re) (.f64 #s(literal -1/3 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 im (fma.f64 #s(literal -2 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (cos.f64 re) (.f64 #s(literal -1/60 binary64) (.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 im (fma.f64 #s(literal -2 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/3 binary64) (cos.f64 re) (.f64 (pow.f64 im #s(literal 2 binary64)) (fma.f64 #s(literal -1/60 binary64) (cos.f64 re) (.f64 #s(literal -1/2520 binary64) (*.f64 (pow.f64 im #s(literal 2 binary64)) (cos.f64 re))))))))))
#s(approx (* 2 (sinh (neg im))) (*.f64 #s(literal -2 binary64) im))
#s(approx (* 2 (sinh (neg im))) (.f64 im (-.f64 (.f64 #s(literal -1/3 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 2 binary64))))
#s(approx (* 2 (sinh (neg im))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/60 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (* 2 (sinh (neg im))) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2520 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/60 binary64))) #s(literal 1/3 binary64))) #s(literal 2 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 #s(literal -1/6 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/120 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx (sinh (neg im)) (.f64 im (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/5040 binary64) (pow.f64 im #s(literal 2 binary64))) #s(literal 1/120 binary64))) #s(literal 1/6 binary64))) #s(literal 1 binary64))))
#s(approx im im)
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) im)))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)))))
#s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 im (-.f64 (.f64 im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/6 binary64) im))) #s(literal 1 binary64)))))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) im))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) im)))))
#s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/6 binary64) im)))))))
#s(approx (* im (+ 1 (* 1/2 im))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) im))))
#s(approx (+ 1 (* 1/2 im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)))
#s(approx (* 1/2 im) (*.f64 #s(literal 1/2 binary64) im))
#s(approx (+ (* -1 im) (* 1/2 (* im (pow re 2)))) (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (neg.f64 im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (neg.f64 im)))
#s(approx (+ 1 (* -1 im)) (*.f64 im (-.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64))))
#s(approx (exp im) (exp.f64 im))
#s(approx (+ 1 (* im (+ 1 (* 1/2 im)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal 2 binary64))))
#s(approx (+ 1 (* im (+ 1 (* 1/2 im)))) (*.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im))))
#s(approx (+ 1 (* im (+ 1 (* 1/2 im)))) (*.f64 (pow.f64 im #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 2 binary64)))))))
#s(approx (+ 1 (* 1/2 im)) (*.f64 im (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im))))
#s(approx (* (* (* 2 (sinh (neg im))) (cos re)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))))))
#s(approx (* (* 2 (sinh (neg im))) (cos re)) (.f64 (cos.f64 re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* 2 (sinh (neg im))) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (.f64 #s(literal -1 binary64) im)))))
#s(approx (sinh (neg im)) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 re) (-.f64 (exp.f64 (*.f64 #s(literal -1 binary64) im)) (exp.f64 im)))))
#s(approx (* 1/2 (- (exp (neg im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) im)) (exp.f64 im))))
#s(approx (- (exp (neg im)) (exp im)) (-.f64 (exp.f64 (*.f64 #s(literal -1 binary64) im)) (exp.f64 im)))
#s(approx (exp (neg im)) (exp.f64 (*.f64 #s(literal -1 binary64) im)))
#s(approx (+ 1 (* -1 im)) (.f64 #s(literal -1 binary64) (.f64 im (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im)))))
#s(approx (+ (* -1 im) (* 1/2 (* im (pow re 2)))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 re #s(literal 2 binary64)))))))

Calls

6 calls:

Time	Variable	Point
5.0ms	re	-inf
4.0ms	im	-inf
4.0ms	im	inf
3.0ms	re	inf
3.0ms	im	0

rewrite198.0ms (3.7%)

Memory

16.6MiB live, 252.4MiB allocated; 33ms collecting garbage

Counts

36 → 116

Calls

Call 1

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

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

eval47.0ms (0.9%)

Memory: -29.9MiB live, 68.5MiB allocated; 41ms collecting garbage
Compiler: Compiled 4 123 to 795 computations (80.7% saved)

prune47.0ms (0.9%)

Memory

3.7MiB live, 49.1MiB allocated; 11ms collecting garbage

Pruning

31 alts after pruning (25 fresh and 6 done)

	Pruned	Kept	Total
New	132	15	147
Fresh	3	10	13
Picked	3	2	5
Done	2	4	6
Total	140	31	171

Accuracy

99.9%

Counts

171 → 31

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) (cos.f64 re)) #s(literal 1/2 binary64))
	43.5%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (cos re) #s(literal 1 binary64))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64)))
✓	64.9%	(.f64 (.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (cos re) #s(literal 1 binary64))) #s(literal 1/2 binary64))
	4.5%	(.f64 (.f64 im #s(approx (cos re) #s(literal 1 binary64))) #s(literal 1/2 binary64))
✓	99.8%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)))))
	53.7%	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) #s(approx (/ ( 2 (sinh (neg im))) (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1))) (*.f64 #s(literal -2/3 binary64) im))))
	8.1%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 (*.f64 re re) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(literal 2 binary64))
	26.8%	(.f64 #s(approx ( 1/2 (cos re)) (fma.f64 re #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im))))
	41.2%	(.f64 #s(approx ( 1/2 (cos re)) (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal -1/4 binary64) re) re))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	16.1%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* re -1/4) 1/2) (*.f64 #s(literal -1/4 binary64) re))) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
	2.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(approx (+ (* re -1/4) 1/2) (*.f64 #s(literal -1/4 binary64) re))) #s(literal 2 binary64))
	64.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) (.f64 #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)) (/.f64 (.f64 #s(literal 2 binary64) (sinh.f64 (neg.f64 im))) #s(approx (+ (exp (neg (+ im im))) (+ (exp (+ im im)) 1)) #s(literal 3 binary64)))))
	2.9%	(.f64 #s(approx ( 1/2 (cos re)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
	2.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 2 binary64) #s(approx (neg (cos re)) #s(literal 2 binary64))))
	22.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 (exp.f64 (neg.f64 im)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
	5.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) im))) #s(approx (exp im) (+.f64 #s(literal 1 binary64) im)))))
	5.1%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx (exp (neg im)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) im))) #s(approx (exp im) (*.f64 (fabs.f64 #s(literal 1/2 binary64)) #s(literal 2 binary64))))))
	19.8%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx 2 #s(literal 2 binary64)) (exp.f64 im))))
	15.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal 1/2 binary64) (-.f64 #s(approx 2 #s(literal 2 binary64)) #s(approx (exp im) (+.f64 #s(literal 1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im))))))))
	3.6%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal 1/2 binary64) (-.f64 #s(approx 2 #s(literal 2 binary64)) #s(literal 2 binary64))))
✓	54.0%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) (.f64 im (cos.f64 re))))
✓	31.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (.f64 #s(literal -1 binary64) #s(approx ( im (cos re)) im)))
✓	2.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) (*.f64 #s(literal -1 binary64) #s(approx (neg (cos re)) #s(literal 2 binary64))))
	39.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 (+.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (.f64 im (pow.f64 re #s(literal 2 binary64)))))))
	29.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re))))))
	28.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 #s(literal 2 binary64) re) (neg.f64 re))))))
	40.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal 1/2 binary64) (.f64 im (pow.f64 (*.f64 re re) #s(literal 2 binary64)))))))
	9.9%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (.f64 (.f64 #s(literal 2 binary64) re) (*.f64 re #s(literal 1/2 binary64)))))
	3.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (*.f64 re #s(literal 1/2 binary64))))
	3.2%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) re))))
	39.7%	#s(approx (* (* 1/2 (cos re)) (- (exp (- 0 im)) (exp im))) #s(approx (* -1 (* im (cos re))) #s(approx (+ (* -1 im) (* 1/2 (* im (pow re 2)))) (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 2 binary64))) #s(literal 1 binary64))))))

Compiler

Compiled 751 to 579 computations (22.9% saved)

regimes1.1s (20.3%)

Memory

-52.6MiB live, 1 048.9MiB allocated; 1.2s collecting garbage

Accuracy

Total -1.1b remaining (-0.2%)

Threshold costs -1.1b (-0.2%)

Counts

2 → 1

10 → 1

13 → 2

14 → 2

16 → 3

18 → 3

19 → 3

21 → 3

23 → 3

24 → 2

25 → 2

33 → 2

34 → 2

38 → 2

41 → 3

46 → 1

Calls

Call 1

Inputs

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

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

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

Call 2

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

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

Call 3

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

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

Outputs

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

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

Call 4

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

Outputs

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

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

Call 5

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

Outputs

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

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

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

Call 6

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

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

Outputs

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

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

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

Call 7

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

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

Outputs

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

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

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

Call 8

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

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

Outputs

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

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

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

Call 9

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

Outputs

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

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

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

Call 10

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

Outputs

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

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

Call 11

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

Outputs

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

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

Call 12

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

Outputs

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

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

Call 13

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

Outputs

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

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

Call 14

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

Outputs

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

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

Call 15

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

Outputs

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

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

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

Call 16

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

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

Calls

57 calls:

497.0ms	im
66.0ms	(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))
28.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))
27.0ms	re
23.0ms	(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))

Results

Accuracy	Segments	Branch
3.2%	1	`im`
3.2%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
3.2%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
3.2%	1	`(cos.f64 re)`
3.2%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
3.2%	1	`re`
31.7%	1	`re`
31.7%	1	`(cos.f64 re)`
31.7%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
31.7%	1	`re`
31.7%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
31.7%	1	`im`
34.0%	2	`(cos.f64 re)`
34.0%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
31.7%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
36.9%	2	`re`
38.3%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
43.6%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
39.1%	3	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
39.1%	3	`im`
44.1%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
54.6%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
51.7%	3	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
53.9%	4	`im`
55.0%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
64.9%	3	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
65.0%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
47.0%	7	`re`
64.9%	3	`im`
39.4%	3	`(cos.f64 re)`
39.4%	3	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
69.4%	2	`(cos.f64 re)`
69.4%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
69.5%	2	`(cos.f64 re)`
69.5%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
76.4%	2	`(cos.f64 re)`
76.4%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
66.9%	2	`re`
77.4%	2	`(cos.f64 re)`
77.4%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
78.4%	2	`(cos.f64 re)`
78.4%	2	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
66.9%	2	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
66.9%	2	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
70.0%	3	`im`
89.6%	3	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
82.2%	3	`(cos.f64 re)`
82.2%	3	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
89.6%	3	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
77.6%	2	`re`
89.6%	3	`im`
99.9%	1	`(-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im))`
99.9%	1	`(cos.f64 re)`
99.9%	1	`(*.f64 #s(literal 1/2 binary64) (cos.f64 re))`
99.9%	1	`(.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 re)) (-.f64 (exp.f64 (-.f64 #s(literal 0 binary64) im)) (exp.f64 im)))`
99.9%	1	`re`
99.9%	1	`im`

Compiler

Compiled 1 363 to 518 computations (62% saved)

bsearch54.0ms (1%)

Memory

13.0MiB live, 128.1MiB allocated; 19ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
20.0ms	2.4958974855817202e-8	3573.531024498557
30.0ms	-6035039.395367483	-3.095828172001074e-5

Samples

26.0ms

320×

valid

Compiler

Compiled 775 to 706 computations (8.9% saved)

Precisions

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

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

ival-exp: 6.0ms (31.1% of total)

ival-mult!: 3.0ms (15.5% of total)

ival-sub!: 1.0ms (5.2% of total)

adjust: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory

2.0MiB live, 2.0MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.01362199890942958	0.03732243875132323

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.02117164943883791	-0.01362199890942958

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.4MiB live, 1.4MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.02117164943883791	-0.01362199890942958

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.01362199890942958	0.03732243875132323

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.09017371409960795	-0.08611755541546663

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.8608771973252177e-5	+inf
0.0ms	-inf	-2.4958974831346126e-8

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch19.0ms (0.4%)

Memory

-43.9MiB live, 2.3MiB allocated; 5ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.8608771973252177e-5	+inf
0.0ms	-inf	-2.4958974831346126e-8

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch1.0ms (0%)

Memory

2.1MiB live, 2.1MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.8608771973252177e-5	+inf
0.0ms	-inf	-2.4958974831346126e-8

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.8608771973252177e-5	+inf
0.0ms	-inf	-2.4958974831346126e-8

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated; 0ms collecting garbage

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	1.8608771973252177e-5	+inf
0.0ms	-inf	-2.4958974831346126e-8

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

0.8MiB live, 0.8MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	1.8608771973252177e-5	+inf

Compiler

Compiled 15 to 16 computations (-6.7% saved)

bsearch0.0ms (0%)

Memory

1.3MiB live, 1.3MiB allocated; 0ms collecting garbage

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.01362199890942958	0.03732243875132323

Compiler

Compiled 15 to 16 computations (-6.7% saved)

derivations5.0ms (0.1%)

Memory

13.4MiB live, 13.4MiB allocated; 0ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 976 to 152 computations (84.4% saved)

preprocess358.0ms (6.6%)

Memory: -10.8MiB live, 469.6MiB allocated; 132ms collecting garbage
Compiler: Compiled 2 940 to 1 261 computations (57.1% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

start0.0ms (0%)

analyze1.0ms (0%)

sample2.1s (39.1%)

preprocess52.0ms (1%)

series102.0ms (1.9%)

rewrite208.0ms (3.8%)

eval12.0ms (0.2%)

prune5.0ms (0.1%)

series175.0ms (3.2%)

rewrite221.0ms (4.1%)

eval22.0ms (0.4%)

prune12.0ms (0.2%)

series140.0ms (2.6%)

rewrite294.0ms (5.4%)

eval22.0ms (0.4%)

prune20.0ms (0.4%)

series181.0ms (3.3%)

rewrite198.0ms (3.7%)

eval47.0ms (0.9%)

prune47.0ms (0.9%)

regimes1.1s (20.3%)

bsearch54.0ms (1%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch19.0ms (0.4%)

bsearch1.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations5.0ms (0.1%)

preprocess358.0ms (6.6%)

end0.0ms (0%)

Profiling