Metrics for Migdal et al, Equation (64)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory

0.5MiB live, 0.5MiB 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 21 to 14 computations (33.3% saved)

sample1.3s (39.4%)

Memory

75.4MiB live, 1 343.0MiB allocated; 480ms collecting garbage

Samples

1.0s

8 256×

valid

Precisions

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

ival-cos: 454.0ms (58.4% of total)

ival-mult!: 265.0ms (34.1% of total)

ival-div!: 40.0ms (5.1% of total)

ival-add!: 18.0ms (2.3% of total)

adjust: 2.0ms (0.3% of total)

Bogosity

preprocess35.0ms (1%)

Memory

-32.7MiB live, 35.2MiB allocated; 38ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	41	133
1	197	133

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))

Symmetry

(abs a1)

(abs a2)

(abs th)

(sort a1 a2)

Compiler

Compiled 38 to 24 computations (36.8% saved)

series117.0ms (3.5%)

Memory

1.3MiB live, 140.4MiB allocated; 16ms collecting garbage

Counts

12 → 32

Calls

Call 1

Inputs
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(*.f64 a2 a2)
a2

Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* a1 a1) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* a2 a2) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx th th)
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) (cos.f64 th))

Calls

9 calls:

Time	Variable	Point
4.0ms	a2	inf
3.0ms	th	-inf
3.0ms	a1	0
2.0ms	th	inf
2.0ms	a2	0

rewrite176.0ms (5.2%)

Memory

-10.7MiB live, 167.4MiB allocated; 57ms collecting garbage

Counts

12 → 47

Calls

Call 1

Inputs
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(*.f64 a2 a2)
a2

Outputs
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (neg.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (neg.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64))) (.f64 a2 a2)))
(fma.f64 (.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) a1) a1 (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)))
(fma.f64 (.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) a2) a2 (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (.f64 a1 a1) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (.f64 a2 a2) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) #s(literal 2 binary64)) (/.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)))
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (.f64 a1 a1))
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) a1) a1)
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))
(*.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 #s(literal 2 binary64)))
(cos.f64 th)
(cos.f64 (fabs.f64 th))
(cos.f64 (neg.f64 th))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
th
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(pow.f64 a1 #s(literal 2 binary64))
a1
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) #s(literal 2 binary64)))
(.f64 (.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) a2) a2)
(/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(pow.f64 a2 #s(literal 2 binary64))
a2

eval7.0ms (0.2%)

Memory: 20.2MiB live, 20.2MiB allocated; 0ms collecting garbage
Compiler: Compiled 1 999 to 301 computations (84.9% saved)

prune8.0ms (0.2%)

Memory

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

Pruning

11 alts after pruning (10 fresh and 1 done)

	Pruned	Kept	Total
New	57	10	67
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	57	11	68

Accuracy

99.7%

Counts

68 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	99.4%	(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
✓	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
	67.3%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
▶	67.2%	(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
▶	97.9%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
▶	99.6%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
▶	62.6%	(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
	99.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	67.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
	87.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	48.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))

Compiler

Compiled 581 to 374 computations (35.6% saved)

series180.0ms (5.4%)

Memory

12.9MiB live, 155.3MiB allocated; 64ms collecting garbage

Counts

30 → 65

Calls

Call 1

Inputs
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))
(pow.f64 a1 #s(literal 2 binary64))
a1
#s(literal 2 binary64)
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
a2
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 a1 a1)
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))
(.f64 (cos.f64 th) (.f64 a1 a1))

Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (pow a1 2) (cos th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (pow a1 2) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx a1 a1)
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (/ (pow a1 2) (sqrt 2)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (cos th) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (pow a1 2) (cos th)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (pow a1 2) (cos th)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (pow a1 2) (cos th)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64)))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx th th)
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (.f64 #s(literal 1/48 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))))))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/4 binary64)))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/1440 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/1440 binary64) (pow.f64 a1 #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (* (cos th) (* a1 a1)) 2) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (* (cos th) (* a1 a1)) 2) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))))
#s(approx (/ (* (cos th) (* a1 a1)) 2) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (/ (* (cos th) (* a1 a1)) 2) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (pow.f64 a1 #s(literal 2 binary64)))))))))
#s(approx (cos th) (cos.f64 th))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (cos th) 2) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))

Calls

9 calls:

Time	Variable	Point
31.0ms	a2	inf
5.0ms	th	-inf
4.0ms	a2	-inf
4.0ms	th	0
3.0ms	th	inf

rewrite158.0ms (4.7%)

Memory

-41.2MiB live, 100.8MiB allocated; 61ms collecting garbage

Counts

30 → 114

Calls

Call 1

Inputs
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))
(pow.f64 a1 #s(literal 2 binary64))
a1
#s(literal 2 binary64)
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
a2
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 a1 a1)
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(fma.f64 a1 a1 (*.f64 a2 a2))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))
(.f64 (cos.f64 th) (.f64 a1 a1))

Outputs
(+.f64 #s(approx (* (* a1 a1) (* (cos th) 1/2)) (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
#s(approx (* (* a1 a1) (* (cos th) 1/2)) (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1))
(.f64 (cos.f64 th) (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)))
(.f64 (.f64 a1 a1) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1)
(/.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (.f64 a1 a1) (cos.f64 th))) #s(literal -2 binary64))
(.f64 (.f64 a1 a1) (cos.f64 th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(.f64 (.f64 (cos.f64 th) a1) a1)
(*.f64 a1 a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(pow.f64 a1 #s(literal 2 binary64))
a1
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(cos.f64 th)
(cos.f64 (fabs.f64 th))
(cos.f64 (neg.f64 th))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
th
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2))
(.f64 (.f64 a2 a2) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2)
(/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 2 binary64))
(*.f64 (cos.f64 th) #s(literal 1/2 binary64))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 th)) #s(literal -2 binary64))
(*.f64 a2 a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(pow.f64 a2 #s(literal 2 binary64))
a2
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64))
#s(approx (cos th) #s(literal 1 binary64))
#s(literal 1 binary64)
(cosh.f64 #s(literal 0 binary64))
(exp.f64 #s(literal 0 binary64))
(*.f64 a1 a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(pow.f64 a1 #s(literal 2 binary64))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
(+.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a2 a2)))
(-.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 2 binary64))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2 (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 a1) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (cos.f64 th) (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2) (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 a2 a2) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 th) #s(literal 1/2 binary64))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 th)) #s(literal -2 binary64))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(-.f64 (.f64 a1 a1) (neg.f64 (.f64 a2 a2)))
(-.f64 (.f64 a1 a1) (.f64 (neg.f64 a2) a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(+.f64 #s(approx (* (* a1 a1) (* (cos th) 1/2)) (.f64 (.f64 a1 a1) #s(literal 1/2 binary64))) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
#s(approx (* (* a1 a1) (* (cos th) 1/2)) (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)))
(.f64 (.f64 a1 a1) #s(literal 1/2 binary64))
(/.f64 (*.f64 a1 a1) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 a1 a1)) #s(literal -2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(+.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
(+.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(-.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a2 a2)))
(-.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 2 binary64))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2 (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 a1) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (cos.f64 th) (.f64 (.f64 a1 a1) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2) (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(fma.f64 (.f64 a2 a2) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1))
(.f64 (cos.f64 th) (.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)))
(.f64 (.f64 a1 a1) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1)
(/.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (.f64 a1 a1) (cos.f64 th))) #s(literal -2 binary64))
(.f64 (.f64 a1 a1) (cos.f64 th))
(.f64 (cos.f64 th) (.f64 a1 a1))
(.f64 (.f64 (cos.f64 th) a1) a1)

eval41.0ms (1.2%)

Memory: 1.6MiB live, 47.0MiB allocated; 5ms collecting garbage
Compiler: Compiled 6 591 to 743 computations (88.7% saved)

prune12.0ms (0.4%)

Memory

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

Pruning

15 alts after pruning (15 fresh and 0 done)

	Pruned	Kept	Total
New	210	12	222
Fresh	2	3	5
Picked	5	0	5
Done	1	0	1
Total	218	15	233

Accuracy

99.7%

Counts

233 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	50.1%	(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
	67.2%	(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
	67.2%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
	67.2%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
▶	99.6%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
	72.9%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 #s(approx (* (pow a1 2) (cos th)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
▶	99.6%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
▶	62.6%	(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
▶	46.9%	(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
▶	50.1%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
	67.3%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
	47.9%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	99.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	87.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	48.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))

Compiler

Compiled 840 to 554 computations (34% saved)

series261.0ms (7.8%)

Memory

-17.2MiB live, 96.4MiB allocated; 243ms collecting garbage

Counts

27 → 66

Calls

Call 1

Inputs
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))
(*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))
#s(literal -1/4 binary64)
(pow.f64 th #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (cos.f64 th) #s(literal 1/2 binary64))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 th) a1) a1)
(*.f64 (cos.f64 th) a1)
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))

Outputs
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (+.f64 (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx a1 a1)
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) a1) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (* (cos th) a1) (*.f64 a1 (cos.f64 th)))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64)))))))
#s(approx a2 a2)
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx th th)
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (.f64 #s(literal 1/48 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))))))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/4 binary64)))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/1440 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))
#s(approx (* -1/4 (pow th 2)) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))
#s(approx (pow th 2) (pow.f64 th #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a1) a1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64)))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (cos th) a1) (+.f64 a1 (.f64 #s(literal -1/2 binary64) (.f64 a1 (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* (cos th) a1) (+.f64 a1 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) a1 (.f64 #s(literal 1/24 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (* (cos th) a1) (+.f64 a1 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) a1 (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 a1 (pow.f64 th #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) a1)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (/ (cos th) 2) (+ (* a1 a1) (* a2 a2))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (cos th) 2) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))
#s(approx (+ 1/2 (* -1/4 (pow th 2))) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 th #s(literal 2 binary64)))) #s(literal 1/4 binary64))))

Calls

9 calls:

Time	Variable	Point
3.0ms	th	inf
3.0ms	th	-inf
2.0ms	a1	inf
2.0ms	a1	-inf
2.0ms	a1	0

rewrite197.0ms (5.9%)

Memory

-15.1MiB live, 125.5MiB allocated; 37ms collecting garbage

Counts

27 → 106

Calls

Call 1

Inputs
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))
(*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))
#s(literal -1/4 binary64)
(pow.f64 th #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (cos.f64 th) #s(literal 1/2 binary64))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 th) a1) a1)
(*.f64 (cos.f64 th) a1)
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))

Outputs
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (cos.f64 th) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
(+.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)))
(-.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a2 a2)))
(-.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 2 binary64))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 a1) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (.f64 a2 a2) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 th))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 th)) #s(literal -2 binary64))
(cos.f64 th)
(cos.f64 (fabs.f64 th))
(cos.f64 (neg.f64 th))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
th
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(-.f64 (.f64 a1 a1) (neg.f64 (.f64 a2 a2)))
(-.f64 (.f64 a1 a1) (.f64 (neg.f64 a2) a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
a1
(*.f64 a2 a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(pow.f64 a2 #s(literal 2 binary64))
a2
(.f64 #s(approx ( (cos th) 1/2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* (cos th) 1/2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (* (cos th) 1/2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (.f64 th th)))
(+.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th)) #s(literal 1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 th th)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th))))
(fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(.f64 #s(literal -1/4 binary64) (.f64 th th))
(.f64 (.f64 th th) #s(literal -1/4 binary64))
#s(literal -1/4 binary64)
(*.f64 th th)
(pow.f64 th #s(literal 2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (cos.f64 th) (.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
(+.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)))
(-.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)) (.f64 (neg.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a2 a2)))
(-.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1)) (neg.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 2 binary64))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 1/2 binary64) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 a1 a1) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (.f64 a2 a2) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 th))
(/.f64 (cos.f64 th) #s(literal 2 binary64))
(/.f64 (neg.f64 (cos.f64 th)) #s(literal -2 binary64))
(+.f64 #s(approx (* (* (* (cos th) a1) a1) 1/2) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1))) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a2 a2)))
#s(approx (* (* (* (cos th) a1) a1) 1/2) (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(.f64 (.f64 (cos.f64 th) a1) (/.f64 a1 #s(literal 2 binary64)))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a1 a1))
(.f64 (.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1/2 binary64))
(.f64 (.f64 a1 a1) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1)
(/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a1 a1))) #s(literal -2 binary64))
(.f64 (cos.f64 th) (.f64 a1 a1))
(.f64 (.f64 (cos.f64 th) a1) a1)
(.f64 a1 (.f64 (cos.f64 th) a1))
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (cos.f64 th))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2))
(.f64 (.f64 a2 a2) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2)
(/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) #s(literal 2 binary64))

eval20.0ms (0.6%)

Memory: 28.0MiB live, 28.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 5 728 to 704 computations (87.7% saved)

prune27.0ms (0.8%)

Memory

-31.8MiB live, 20.6MiB allocated; 14ms collecting garbage

Pruning

18 alts after pruning (16 fresh and 2 done)

	Pruned	Kept	Total
New	217	10	227
Fresh	4	6	10
Picked	3	2	5
Done	0	0	0
Total	224	18	242

Accuracy

99.7%

Counts

242 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
	50.1%	(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
	67.2%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
	67.2%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
	72.9%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 #s(approx (* (pow a1 2) (cos th)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
✓	99.6%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
	67.2%	(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
✓	62.6%	(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
▶	46.9%	(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
	46.9%	(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
▶	15.9%	(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
▶	50.1%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
	50.1%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
	14.3%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
▶	47.9%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
▶	99.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	87.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	48.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	67.3%	#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))

Compiler

Compiled 901 to 617 computations (31.5% saved)

series193.0ms (5.8%)

Memory

21.0MiB live, 209.7MiB allocated; 66ms collecting garbage

Counts

34 → 72

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))
(pow.f64 a2 #s(literal 2 binary64))
a2
#s(literal 2 binary64)
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
a1
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 th th)
#s(literal -1/4 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))
(*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))
(pow.f64 th #s(literal 2 binary64))
#s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64)))
(pow.f64 a1 #s(literal 2 binary64))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))

Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* a1 a1) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx a1 a1)
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (pow a1 2) (sqrt 2)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (pow a2 2) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 th) (pow.f64 a2 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (pow a2 2) (cos th)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (pow a2 2) (cos th)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (pow a2 2) (cos th)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64)))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx th th)
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (.f64 #s(literal 1/48 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))))))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/48 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/4 binary64)))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -1/1440 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))
#s(approx (* th th) (pow.f64 th #s(literal 2 binary64)))
#s(approx (* -1/4 (pow th 2)) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/1440 binary64) (pow.f64 a1 #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (pow a1 2) (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (pow a1 2) (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (fma.f64 (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (pow a1 2) (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (fma.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64)))))))
#s(approx (* (pow a1 2) (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))))) (fma.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 (pow.f64 a1 #s(literal 2 binary64)) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/1440 binary64))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) #s(literal 1/4 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+.f64 #s(literal 1/2 binary64) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/48 binary64) (fma.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/1440 binary64))))))) #s(literal 1/4 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/24 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2))) (fma.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (pow.f64 th #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (/ (cos th) 2) (+ (* a2 a2) (* a1 a1))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (+ (* (* th th) -1/4) 1/2) (.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 th #s(literal 2 binary64)))) #s(literal 1/4 binary64))))

Calls

9 calls:

Time	Variable	Point
3.0ms	th	-inf
3.0ms	th	inf
3.0ms	a1	inf
3.0ms	a2	inf
2.0ms	a1	-inf

rewrite175.0ms (5.2%)

Memory

24.5MiB live, 113.3MiB allocated; 26ms collecting garbage

Counts

34 → 135

Calls

Call 1

Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))
(pow.f64 a2 #s(literal 2 binary64))
a2
#s(literal 2 binary64)
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
a1
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(*.f64 th th)
#s(literal -1/4 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 a2 a2)
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))
(*.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64)))
(pow.f64 th #s(literal 2 binary64))
#s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64)))
(pow.f64 a1 #s(literal 2 binary64))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))

Outputs
#s(approx (* (* (cos th) 1/2) (+ (* a1 a1) (* a2 a2))) (.f64 (.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1/2 binary64))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (*.f64 a2 a2))
(.f64 (.f64 a2 a2) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2)
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (.f64 a2 a2) (cos.f64 th))) #s(literal -2 binary64))
(.f64 (.f64 a2 a2) (cos.f64 th))
(.f64 (cos.f64 th) (.f64 a2 a2))
(*.f64 a2 a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(pow.f64 a2 #s(literal 2 binary64))
a2
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(cos.f64 th)
(cos.f64 (fabs.f64 th))
(cos.f64 (neg.f64 th))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
th
#s(literal 2 binary64)
(fabs.f64 #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(.f64 #s(approx ( (cos th) 1/2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
#s(approx (* (cos th) 1/2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(-.f64 (.f64 a1 a1) (neg.f64 (.f64 a2 a2)))
(-.f64 (.f64 a2 a2) (neg.f64 (.f64 a1 a1)))
(-.f64 (.f64 a1 a1) (.f64 (neg.f64 a2) a2))
(-.f64 (.f64 a2 a2) (.f64 (neg.f64 a1) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(*.f64 a1 a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(pow.f64 a1 #s(literal 2 binary64))
a1
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
#s(approx (* (cos th) 1/2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (.f64 th th)))
(+.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th)) #s(literal 1/2 binary64))
(-.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th)) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 th th)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th))))
(fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 th (*.f64 th #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(*.f64 th th)
(*.f64 (fabs.f64 th) (fabs.f64 th))
(*.f64 (neg.f64 th) (neg.f64 th))
(pow.f64 th #s(literal 2 binary64))
#s(literal -1/4 binary64)
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(+.f64 (.f64 a2 a2) (.f64 a1 a1))
(-.f64 (.f64 a1 a1) (neg.f64 (.f64 a2 a2)))
(-.f64 (.f64 a2 a2) (neg.f64 (.f64 a1 a1)))
(-.f64 (.f64 a1 a1) (.f64 (neg.f64 a2) a2))
(-.f64 (.f64 a2 a2) (.f64 (neg.f64 a1) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(*.f64 a2 a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(pow.f64 a2 #s(literal 2 binary64))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
#s(approx (* (cos th) 1/2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (.f64 th th)))
(+.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th)) #s(literal 1/2 binary64))
(-.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th)) #s(literal -1/2 binary64))
(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 th th)))
(-.f64 #s(literal 1/2 binary64) (neg.f64 (.f64 #s(literal -1/4 binary64) (.f64 th th))))
(fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(fma.f64 th (*.f64 th #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))
(.f64 #s(literal -1/4 binary64) (.f64 th th))
(.f64 (.f64 th th) #s(literal -1/4 binary64))
(.f64 th (.f64 th #s(literal -1/4 binary64)))
(*.f64 th th)
(*.f64 (fabs.f64 th) (fabs.f64 th))
(*.f64 (neg.f64 th) (neg.f64 th))
(pow.f64 th #s(literal 2 binary64))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1))
(*.f64 a1 a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(pow.f64 a1 #s(literal 2 binary64))
#s(approx (* (* (cos th) 1/2) (+ (* a1 a1) (* a2 a2))) (.f64 (.f64 a1 a1) (fma.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(.f64 (.f64 a1 a1) (fma.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))))
(.f64 (fma.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a1 a1))
(+.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (*.f64 a1 a1)))
(+.f64 (.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64)) (.f64 (.f64 a1 a1) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1) (.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a1 a1)))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1 (.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a1 a1)))
(fma.f64 (.f64 a1 a1) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a1 a1)))
(fma.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64) (.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (.f64 a1 a1)))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (*.f64 a1 a1)))
(fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 a1 a1) (.f64 (.f64 a1 a1) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) a1) a1 (.f64 (.f64 a1 a1) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 a1 a1) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 a1 a1) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) #s(literal 1/2 binary64) (.f64 (.f64 a1 a1) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (.f64 a1 a1) #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(+.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(+.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64))))
(-.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (neg.f64 (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (.f64 a1 a1) #s(literal 2 binary64)) (.f64 (.f64 a2 a2) (cos.f64 th))) (.f64 (*.f64 a1 a1) #s(literal 2 binary64)))
(fma.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 (.f64 a1 a1) #s(literal 2 binary64))) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(fma.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (.f64 a1 a1) #s(literal 2 binary64))) (*.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 th) #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64))))
(.f64 (/.f64 (.f64 a2 a2) (.f64 a1 a1)) (.f64 (cos.f64 th) #s(literal 1/2 binary64)))
(.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (.f64 (*.f64 a1 a1) #s(literal 2 binary64))))
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (.f64 (.f64 a1 a1) #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (.f64 (.f64 a1 a1) #s(literal 2 binary64)))
(/.f64 (neg.f64 (.f64 (.f64 a2 a2) (cos.f64 th))) (neg.f64 (.f64 (.f64 a1 a1) #s(literal 2 binary64))))
(/.f64 (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (*.f64 a1 a1)) #s(literal 2 binary64))
(.f64 (.f64 a1 a1) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (.f64 a1 a1))

eval29.0ms (0.9%)

Memory: -9.7MiB live, 34.1MiB allocated; 12ms collecting garbage
Compiler: Compiled 7 182 to 824 computations (88.5% saved)

prune15.0ms (0.4%)

Memory

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

Pruning

23 alts after pruning (19 fresh and 4 done)

	Pruned	Kept	Total
New	179	10	189
Fresh	2	9	11
Picked	3	2	5
Done	0	2	2
Total	184	23	207

Accuracy

99.8%

Counts

207 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	50.1%	(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
	67.2%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
	67.2%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
	72.9%	(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 #s(approx (* (pow a1 2) (cos th)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
✓	99.6%	(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
	67.2%	(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
✓	62.6%	(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
✓	46.9%	(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
	46.9%	(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
✓	50.1%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
	50.1%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
	14.3%	(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
	15.9%	(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
	32.4%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) #s(approx (+ ( 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
	47.8%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) #s(approx (+ ( 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 th) (pow.f64 a2 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
	63.8%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) #s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
	16.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	99.4%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
	87.1%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	48.0%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
	62.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2))
	62.6%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1/2 binary64)))
	67.3%	#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Compiler

Compiled 672 to 440 computations (34.5% saved)

regimes249.0ms (7.4%)

Memory

-16.2MiB live, 232.4MiB allocated; 43ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

2 → 1

3 → 2

7 → 2

8 → 2

18 → 2

21 → 2

26 → 1

43 → 1

Calls

Call 1

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))

Outputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))

Call 2

Inputs

(*.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))

(*.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))

(*.f64 #s(approx (* (cos th) 1/2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)))

Outputs
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))

Outputs

(*.f64 #s(approx (* (cos th) 1/2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)))

(*.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))

Call 3

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))

Outputs
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))

Outputs

(*.f64 #s(approx (* (cos th) 1/2) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1)))

(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))

Call 4

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))

Outputs
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))

Outputs

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

(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))

Call 5

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))

Outputs
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Outputs

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

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Call 6

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1/2 binary64)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Outputs

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2))

#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Call 7

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1/2 binary64)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) #s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))

Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))

Call 8

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 #s(approx ( (cos th) 1/2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) #s(approx (+ ( a1 a1) (* a2 a2)) (*.f64 a1 a1)))
(.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) #s(approx (+ ( a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (fma.f64 (.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (* (pow a2 2) (cos th)) (sqrt 2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a1 #s(literal 2 binary64))))
(.f64 #s(approx (/ (cos th) 2) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/4 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(approx (+ (* a1 a1) (* a2 a2)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) a2) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1/2 binary64)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) #s(approx (cos th) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 (cos.f64 th) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a2 a2)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) #s(approx (+ ( 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (+.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
(+.f64 (/.f64 (.f64 (cos.f64 th) (.f64 a1 a1)) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 #s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 #s(approx (* (pow a1 2) (cos th)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 th) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (pow.f64 a1 #s(literal 2 binary64)) #s(approx (+ ( 1/2 (cos th)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))) (.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 th) (pow.f64 a2 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))

Outputs
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))

Calls

47 calls:

17.0ms	th
14.0ms	(cos.f64 th)
11.0ms	(cos.f64 th)
10.0ms	a1
10.0ms	a2

Results

Accuracy	Segments	Branch
50.1%	1	`(*.f64 a2 a2)`
50.1%	1	`a2`
50.1%	1	`(cos.f64 th)`
50.1%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
50.1%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
50.1%	1	`(*.f64 a2 a2)`
50.1%	1	`a2`
50.1%	1	`th`
50.1%	1	`(*.f64 a1 a1)`
50.1%	1	`a1`
56.3%	2	`(cos.f64 th)`
56.3%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
56.7%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
73.4%	2	`(cos.f64 th)`
73.4%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
67.2%	1	`(*.f64 a2 a2)`
67.2%	1	`a2`
73.8%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
78.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
67.3%	1	`th`
78.2%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
77.7%	2	`(cos.f64 th)`
77.7%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
78.0%	2	`(*.f64 a2 a2)`
70.7%	2	`(*.f64 a1 a1)`
80.0%	2	`(cos.f64 th)`
80.0%	2	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
79.9%	2	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
70.7%	2	`a1`
78.0%	2	`a2`
79.6%	2	`th`
99.4%	1	`(*.f64 a2 a2)`
99.4%	1	`(*.f64 a1 a1)`
99.4%	1	`(cos.f64 th)`
99.4%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.4%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.4%	1	`a1`
99.4%	1	`a2`
99.4%	1	`th`
99.6%	1	`(*.f64 a2 a2)`
99.6%	1	`(*.f64 a1 a1)`
99.6%	1	`(cos.f64 th)`
99.6%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.6%	1	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
99.6%	1	`a1`
99.6%	1	`a2`
99.6%	1	`th`

Compiler

Compiled 1 416 to 431 computations (69.6% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.5096341749817026	0.5330318030151293

Compiler

Compiled 18 to 18 computations (0% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.9548236911983854e-102	-1.4952876961645516e-160

Compiler

Compiled 22 to 18 computations (18.2% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.9548236911983854e-102	-1.4952876961645516e-160

Compiler

Compiled 22 to 18 computations (18.2% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.9548236911983854e-102	-1.4952876961645516e-160

Compiler

Compiled 22 to 18 computations (18.2% saved)

bsearch0.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.9548236911983854e-102	-1.4952876961645516e-160

Compiler

Compiled 22 to 18 computations (18.2% saved)

derivations2.0ms (0.1%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 373 to 65 computations (82.6% saved)

preprocess129.0ms (3.8%)

Memory

12.7MiB live, 201.6MiB allocated; 15ms collecting garbage

Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 4 438 to 2 251 computations (49.3% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample1.3s (39.4%)

preprocess35.0ms (1%)

series117.0ms (3.5%)

rewrite176.0ms (5.2%)

eval7.0ms (0.2%)

prune8.0ms (0.2%)

series180.0ms (5.4%)

rewrite158.0ms (4.7%)

eval41.0ms (1.2%)

prune12.0ms (0.4%)

series261.0ms (7.8%)

rewrite197.0ms (5.9%)

eval20.0ms (0.6%)

prune27.0ms (0.8%)

series193.0ms (5.8%)

rewrite175.0ms (5.2%)

eval29.0ms (0.9%)

prune15.0ms (0.4%)

regimes249.0ms (7.4%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations2.0ms (0.1%)

preprocess129.0ms (3.8%)

end0.0ms (0%)

Profiling