Metrics for Migdal et al, Equation (64)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory

0.8MiB live, 0.8MiB 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.9%)

Memory

82.9MiB live, 1 501.3MiB allocated; 478ms collecting garbage

Samples

880.0ms

8 256×

valid

Precisions

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

ival-cos: 294.0ms (50.2% of total)

ival-mult!: 205.0ms (35% of total)

ival-add!: 46.0ms (7.9% of total)

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

adjust: 2.0ms (0.3% of total)

Bogosity

preprocess22.0ms (0.7%)

Memory

-13.8MiB live, 32.1MiB allocated; 5ms 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)

series177.0ms (5.4%)

Memory

14.2MiB live, 111.6MiB allocated; 84ms 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
3.0ms	th	-inf
2.0ms	a1	0
2.0ms	th	inf
2.0ms	a2	0
2.0ms	th	0

rewrite171.0ms (5.2%)

Memory

-8.2MiB live, 82.5MiB allocated; 18ms 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: 8.7MiB live, 8.7MiB allocated; 0ms collecting garbage
Compiler: Compiled 1 999 to 301 computations (84.9% saved)

prune8.0ms (0.2%)

Memory

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

series287.0ms (8.8%)

Memory

-72.0MiB live, 82.9MiB allocated; 268ms 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
148.0ms	th	-inf
3.0ms	a1	inf
3.0ms	th	inf
2.0ms	a1	0
2.0ms	a1	-inf

rewrite142.0ms (4.3%)

Memory

-5.1MiB live, 85.8MiB allocated; 15ms collecting garbage

Counts

30 → 31

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 (* (/ (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))
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(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))

eval15.0ms (0.5%)

Memory: 19.0MiB live, 19.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 3 874 to 433 computations (88.8% saved)

prune13.0ms (0.4%)

Memory

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

Pruning

16 alts after pruning (13 fresh and 3 done)

	Pruned	Kept	Total
New	93	9	102
Fresh	1	4	5
Picked	3	2	5
Done	0	1	1
Total	97	16	113

Accuracy

99.7%

Counts

113 → 16

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) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (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)))
	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)))
	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)))
	62.6%	(.f64 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (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 557 computations (33.7% saved)

series208.0ms (6.4%)

Memory

-4.0MiB live, 183.9MiB allocated; 39ms collecting garbage

Counts

29 → 80

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 a1 a1 (.f64 a2 a2)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
#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)))))
(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))))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.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))))
#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) (+ (* 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 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 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (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 (pow a1 2) (pow.f64 a1 #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 (+ (* 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 (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 #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 (+ (* 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 (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 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 (+ (* 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) (+ (* 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 (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (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)) (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) (+ (* 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)) (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) (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 (* (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) (+ (* 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) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))

Calls

9 calls:

Time	Variable	Point
20.0ms	a1	-inf
10.0ms	a1	inf
6.0ms	th	-inf
6.0ms	a2	0
5.0ms	a2	inf

rewrite180.0ms (5.5%)

Memory

-4.0MiB live, 134.1MiB allocated; 52ms collecting garbage

Counts

29 → 32

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 a1 a1 (.f64 a2 a2)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
#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)))))
(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))))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.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))))
#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))))
(/.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 a1 a1 (.f64 a2 a2)))
#s(approx (/ (cos th) 2) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(+.f64 (.f64 a1 a1) (.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
#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)))))
(+.f64 (*.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))))
(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))))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.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))))
#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))))))
(+.f64 (.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)))

eval11.0ms (0.3%)

Memory: 16.0MiB live, 16.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 4 778 to 526 computations (89% saved)

prune17.0ms (0.5%)

Memory

-31.1MiB live, 14.6MiB allocated; 6ms collecting garbage

Pruning

20 alts after pruning (14 fresh and 6 done)

	Pruned	Kept	Total
New	95	6	101
Fresh	0	8	8
Picked	2	3	5
Done	0	3	3
Total	97	20	117

Accuracy

99.7%

Counts

117 → 20

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) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (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)))
▶	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)))
▶	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)))
▶	62.6%	(.f64 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (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)))
	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))))
	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)))))))))
	67.3%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
▶	14.3%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #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))))
	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))))
	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 1 126 to 728 computations (35.3% saved)

series160.0ms (4.9%)

Memory

27.4MiB live, 124.0MiB allocated; 50ms collecting garbage

Counts

33 → 74

Calls

Call 1

Inputs
(+.f64 #s(approx (/ (* (cos th) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #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) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(pow.f64 a1 #s(literal 2 binary64))
a1
#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)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(*.f64 a2 a2)
a2
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))) (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))
(fma.f64 a1 a1 (*.f64 a2 a2))
(.f64 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 th))
(+.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) (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 #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)))
#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))))
(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(literal -1/2 binary64)
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))

Outputs
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (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) (* 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 (* 1/2 (pow a1 2)) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (pow a1 2) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx a1 a1)
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (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) 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 (+ (* (/ (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 (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* (pow a1 2) (pow th 2)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #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 (pow a1 2)) (/ (pow a2 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 (* (/ (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) (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)
#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 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #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 (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) (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))) (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) (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) (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) #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 (* (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) (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))))
#s(approx (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (*.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 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))))

Calls

9 calls:

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

rewrite170.0ms (5.2%)

Memory

-9.5MiB live, 81.9MiB allocated; 10ms collecting garbage

Counts

33 → 35

Calls

Call 1

Inputs
(+.f64 #s(approx (/ (* (cos th) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #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) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(pow.f64 a1 #s(literal 2 binary64))
a1
#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)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(*.f64 a2 a2)
a2
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))) (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))
(fma.f64 a1 a1 (*.f64 a2 a2))
(.f64 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 th))
(+.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) (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 #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)))
#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))))
(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(literal -1/2 binary64)
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))

Outputs
(+.f64 #s(approx (/ (* (cos th) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #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) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(pow.f64 a1 #s(literal 2 binary64))
a1
#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)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
(*.f64 a2 a2)
a2
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))) (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 a1 a1) (.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(.f64 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (/ (cos th) 2) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 th))
(+.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) (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 #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)))
#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))))
(+.f64 (.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)))
(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(literal -1/2 binary64)
(*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))

eval31.0ms (1%)

Memory: 19.5MiB live, 19.5MiB allocated; 0ms collecting garbage
Compiler: Compiled 4 291 to 488 computations (88.6% saved)

prune33.0ms (1%)

Memory

-39.2MiB live, 16.0MiB allocated; 42ms collecting garbage

Pruning

21 alts after pruning (11 fresh and 10 done)

	Pruned	Kept	Total
New	104	2	106
Fresh	0	9	9
Picked	1	4	5
Done	0	6	6
Total	105	21	126

Accuracy

99.7%

Counts

126 → 21

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) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 a1 #s(literal 2 binary64)))) (.f64 (/.f64 (cos.f64 th) (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)))
	53.6%	(+.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 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.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)))
	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))))
✓	62.6%	(.f64 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (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)))
	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))))
	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)))))))))
	67.3%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
✓	14.3%	#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a1 #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))))
	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))))
	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 653 to 428 computations (34.5% saved)

regimes202.0ms (6.2%)

Memory

24.9MiB live, 215.1MiB allocated; 16ms collecting garbage

Accuracy

Total -23.1b remaining (-28.8%)

Threshold costs -23.1b (-28.8%)

Counts

3 → 1

5 → 1

11 → 2

13 → 2

21 → 1

28 → 1

Calls

Call 1

Inputs

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

#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))

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)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (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)) (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)))

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

Outputs

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

Call 3

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (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)) (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)))
(.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) (* 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 (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))))

Outputs
(.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) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Outputs

(*.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) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))

Call 4

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (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)) (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)))
(.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) (* 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 (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 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))

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

Outputs

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

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

Call 5

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (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)) (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)))
(.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) (* 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 (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 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) #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 a2 #s(literal 2 binary64)) (cos.f64 th)) (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 #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) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 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 (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 #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 #s(approx (cos th) #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)))

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

Call 6

Inputs
(.f64 #s(approx (/ (cos th) 2) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (sqrt 2))) (*.f64 #s(literal 1/2 binary64) (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))))
#s(approx (+ (/ (* (cos th) (* a1 a1)) 2) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (+ (* 1/2 (pow a1 2)) (/ (pow a2 2) (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)) (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)))
(.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) (* 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 (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 #s(approx (/ (cos th) 2) (.f64 #s(literal 1/2 binary64) (cos.f64 th))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(.f64 (/.f64 (cos.f64 th) #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 a2 #s(literal 2 binary64)) (cos.f64 th)) (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 #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) (* a1 a1)) 2) (.f64 #s(literal 1/2 binary64) (pow.f64 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 (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 #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 #s(approx (cos th) #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 (.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 (/.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)))

Calls

43 calls:

9.0ms	(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
9.0ms	(*.f64 a1 a1)
8.0ms	a1
8.0ms	(*.f64 a2 a2)
8.0ms	(*.f64 a1 a1)

Results

Accuracy	Segments	Branch
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	`(cos.f64 th)`
50.1%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
50.1%	1	`th`
50.1%	1	`(*.f64 a1 a1)`
50.1%	1	`a1`
50.1%	1	`(*.f64 a2 a2)`
50.1%	1	`a2`
67.3%	1	`(*.f64 a1 a1)`
67.3%	1	`a1`
67.3%	1	`(cos.f64 th)`
67.3%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
67.3%	1	`(*.f64 a2 a2)`
67.3%	1	`a2`
67.3%	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)))`
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)`
72.8%	3	`(*.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)))`
72.8%	3	`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 065 to 358 computations (66.4% 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)

derivations2.0ms (0.1%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 240 to 57 computations (76.3% saved)

preprocess106.0ms (3.3%)

Memory

14.5MiB live, 203.8MiB allocated; 11ms collecting garbage

Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 3 427 to 2 003 computations (41.6% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample1.3s (39.9%)

preprocess22.0ms (0.7%)

series177.0ms (5.4%)

rewrite171.0ms (5.2%)

eval7.0ms (0.2%)

prune8.0ms (0.2%)

series287.0ms (8.8%)

rewrite142.0ms (4.3%)

eval15.0ms (0.5%)

prune13.0ms (0.4%)

series208.0ms (6.4%)

rewrite180.0ms (5.5%)

eval11.0ms (0.3%)

prune17.0ms (0.5%)

series160.0ms (4.9%)

rewrite170.0ms (5.2%)

eval31.0ms (1%)

prune33.0ms (1%)

regimes202.0ms (6.2%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

derivations2.0ms (0.1%)

preprocess106.0ms (3.3%)

end0.0ms (0%)

Profiling