Metrics for Migdal et al, Equation (64)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory

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

Algorithm

1×

Search

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

Compiler

Compiled 21 to 14 computations (33.3% saved)

sample1.1s (34.4%)

Memory

-1.4MiB live, 1 272.8MiB allocated; 175ms collecting garbage

Samples

843.0ms

8 256×

valid

Precisions

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

ival-mult: 200.0ms (36.3% of total)

ival-cos: 192.0ms (34.8% of total)

ival-sqrt: 60.0ms (10.9% of total)

ival-div: 52.0ms (9.4% of total)

ival-add: 37.0ms (6.7% of total)

exact: 6.0ms (1.1% of total)

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

adjust: 2.0ms (0.4% of total)

Bogosity

explain136.0ms (4.1%)

Memory

6.8MiB live, 202.6MiB allocated; 6ms collecting garbage

FPErrors

Click to see full error table

Example	Example	Subexpression
-	-	`a1`
-	-	`(*.f64 a1 a1)`
-	-	`(sqrt.f64 #s(literal 2 binary64))`
-	-	`th`
-	-	`#s(literal 2 binary64)`
-	-	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
-	-	`(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))`
-	-	`(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))`
-	-	`(*.f64 a2 a2)`
-	-	`(cos.f64 th)`
-	-	`(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))`
-	-	`a2`

Confusion

	Predicted +	Predicted -
+	0	0
-	0	256

Precision

0/0

Recall

0/0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	0	0	0
-	0	0	256

Precision?

0/0

Recall?

0/0

Freqs

test

number	freq
0	256

Total Confusion?

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

Precision?

0/0

Recall?

0/0

Samples

54.0ms

512×

valid

Compiler

Compiled 135 to 40 computations (70.4% saved)

Precisions

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

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

ival-mult: 12.0ms (33.9% of total)

ival-sqrt: 4.0ms (11.3% of total)

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

ival-add: 2.0ms (5.6% of total)

adjust: 0.0ms (0% of total)

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

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

exact: 0.0ms (0% of total)

preprocess210.0ms (6.4%)

Memory

3.2MiB live, 145.1MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	41	133
1	163	133
2	595	133
3	1542	133
4	3030	133
5	4451	133
6	7243	133
0	12	19
0	20	13
1	52	13
2	174	13
3	551	13
4	1112	13
5	1706	13
6	3090	13
7	7183	13
0	8100	12

Stop Event

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

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

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

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

Symmetry

(abs a1)

(abs a2)

(abs th)

(sort a1 a2)

Compiler

Compiled 19 to 12 computations (36.8% saved)

eval0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory

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

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

Compiler

Compiled 19 to 12 computations (36.8% saved)

series20.0ms (0.6%)

Memory

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

Counts

12 → 34

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

Calls

9 calls:

Time	Variable		Point	Expression
4.0ms	th	@	-inf	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* a2 a2) a2)
3.0ms	a1	@	0	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* a2 a2) a2)
2.0ms	th	@	inf	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* a2 a2) a2)
2.0ms	a2	@	0	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* a2 a2) a2)
2.0ms	th	@	0	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* a2 a2) a2)

rewrite193.0ms (5.8%)

Memory

-4.4MiB live, 184.0MiB allocated; 21ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	158	1016
0	172	890
1	999	852
0	8444	800

Stop Event

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

Counts

46 → 152

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

Outputs
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1)))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th) (.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th) (.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a1) a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64)))))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (cos.f64 th))) #s(literal 2 binary64))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1 (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a1 a1) (.f64 a2 a2)))) (/.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (.f64 a1 a1) (.f64 a2 a2)))))
(-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1)) a1))
(-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)))
(-.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2)) a2))
(-.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))))) (/.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))))))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)))
(+.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1)
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 (neg.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
th
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 a1 a1)
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 a1) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 a1) #s(literal 2 binary64))))
a1
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2)
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(/.f64 (neg.f64 (.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (.f64 (.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 a2 a2)
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 a2) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 a2) #s(literal 2 binary64))))
a2
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 a2 a2) (/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (.f64 a1 a1))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 a1 a1) (/.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 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* a2 a2) (*.f64 a2 a2))
#s(approx a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (.f64 (.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 th th)) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 th th)) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 th th)) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 th th) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 th th) (/.f64 (fma.f64 a2 a2 (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 th a1) #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (pow.f64 (.f64 th a1) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (pow.f64 (.f64 th a1) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 th th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 th th) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 th th) #s(literal -1/2 binary64)) (.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 th th) #s(literal 1/24 binary64)) (.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx th th)
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 th a2) #s(literal 2 binary64)) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (pow.f64 (.f64 th a2) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (pow.f64 (.f64 th a2) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 th th) (/.f64 (.f64 a2 a2) (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))

eval20.0ms (0.6%)

Memory: -14.2MiB live, 32.6MiB allocated; 2ms collecting garbage
Compiler: Compiled 4 786 to 594 computations (87.6% saved)

prune216.0ms (6.5%)

Memory

-2.7MiB live, 240.3MiB allocated; 9ms collecting garbage

Pruning

5 alts after pruning (4 fresh and 1 done)

	Pruned	Kept	Total
New	183	4	187
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	183	5	188

Accuracy

100.0%

Counts

188 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))) #s(literal 2 binary64))
	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))) #s(literal 2 binary64))
	99.7%	(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
▶	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/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)))

Compiler

Compiled 100 to 69 computations (31% saved)

series15.0ms (0.5%)

Memory

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

Counts

17 → 39

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
2.0ms	th	@	inf	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (/ (cos th) (/ 1 (pow 2 -1/2))) (/ 1 (pow 2 -1/2)) 1 (pow 2 -1/2) -1/2 (* a2 a2) a2)
2.0ms	th	@	-inf	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (/ (cos th) (/ 1 (pow 2 -1/2))) (/ 1 (pow 2 -1/2)) 1 (pow 2 -1/2) -1/2 (* a2 a2) a2)
2.0ms	a2	@	inf	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (/ (cos th) (/ 1 (pow 2 -1/2))) (/ 1 (pow 2 -1/2)) 1 (pow 2 -1/2) -1/2 (* a2 a2) a2)
2.0ms	a1	@	0	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (/ (cos th) (/ 1 (pow 2 -1/2))) (/ 1 (pow 2 -1/2)) 1 (pow 2 -1/2) -1/2 (* a2 a2) a2)
2.0ms	a1	@	inf	((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) th (sqrt 2) 2 (* a1 a1) a1 (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (/ (cos th) (/ 1 (pow 2 -1/2))) (/ 1 (pow 2 -1/2)) 1 (pow 2 -1/2) -1/2 (* a2 a2) a2)

rewrite162.0ms (4.9%)

Memory

-11.0MiB live, 172.6MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	186	1194
0	203	1101
1	1167	1042
0	8331	986

Stop Event

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

Counts

56 → 192

Calls

Call 1

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

Outputs
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (cos.f64 th) (.f64 a2 a2) (.f64 (*.f64 a1 a1) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (.f64 a1 a1) (cos.f64 th) (.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 a1 a1) (cos.f64 th)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (cos.f64 th) (.f64 a2 a2)))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (cos.f64 th) (.f64 a2 a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1 (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1) (.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2) (.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (.f64 (cos.f64 th) (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1)) a1))
(-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)))
(-.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (neg.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2)) a2))
(-.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(+.f64 (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1)
(.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1))
(/.f64 (neg.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (.f64 (.f64 a1 a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
th
(*.f64 (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1/2 binary64)) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 a1 a1)
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 a1) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 a1) #s(literal 2 binary64))))
a1
(.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2)
(.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a2 a2))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 (cos.f64 th) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1/2 binary64)) (pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
(neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(exp.f64 (.f64 (.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 1 binary64)
(tanh.f64 (asinh.f64 #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (fabs.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(sin.f64 (atan.f64 #s(literal 1 binary64)))
(cos.f64 (atan.f64 #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sinh.f64 (.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))))
#s(literal -1/2 binary64)
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 a2 a2)
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 a2) #s(literal 2 binary64))) (sinh.f64 (.f64 (log.f64 a2) #s(literal 2 binary64))))
a2
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (.f64 a2 a2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (.f64 (fma.f64 (.f64 a2 a2) (.f64 (/.f64 (cos.f64 th) a1) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (.f64 a1 a1)))
#s(approx (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (* a2 a2) (*.f64 a2 a2))
#s(approx a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (.f64 (fma.f64 (/.f64 (cos.f64 th) (.f64 a2 a2)) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th))) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (fma.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (.f64 th th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/24 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (.f64 th th))) (.f64 th th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2))) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 #s(literal -1/720 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (.f64 th th))) (.f64 th th))) (.f64 th th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 th a1) #s(literal 2 binary64)) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (pow.f64 (.f64 th a1) #s(literal 2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (pow.f64 (.f64 th a1) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 th th) (/.f64 (.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 th th) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64)))) (.f64 th th) (pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 th th) #s(literal -1/2 binary64)) (.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 th th) #s(literal 1/24 binary64)) (.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx th th)
#s(approx (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2)))
#s(approx (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (fma.f64 (.f64 (pow.f64 (.f64 a2 th) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2))))
#s(approx (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (pow.f64 (.f64 a2 th) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 1/24 binary64))) (.f64 th th) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2))))
#s(approx (* (/ (cos th) (/ 1 (pow 2 -1/2))) (* a2 a2)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (pow.f64 (.f64 a2 th) #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/720 binary64))) (.f64 th th))) (.f64 th th) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 a2 a2))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (sqrt.f64 #s(literal 1/2 binary64)))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (fma.f64 (.f64 (.f64 th th) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (fma.f64 (fma.f64 (.f64 (.f64 th th) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 1/24 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (.f64 th th) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 th th) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (.f64 th th) (sqrt.f64 #s(literal 1/2 binary64))))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) (cos.f64 th))
#s(approx (/ (cos th) (/ 1 (pow 2 -1/2))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))

eval24.0ms (0.7%)

Memory: -15.2MiB live, 38.9MiB allocated; 5ms collecting garbage
Compiler: Compiled 5 432 to 726 computations (86.6% saved)

prune298.0ms (9%)

Memory

32.6MiB live, 409.0MiB allocated; 42ms collecting garbage

Pruning

5 alts after pruning (3 fresh and 2 done)

	Pruned	Kept	Total
New	188	0	188
Fresh	0	3	3
Picked	0	1	1
Done	0	1	1
Total	188	5	193

Accuracy

100.0%

Counts

193 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))) #s(literal 2 binary64))
	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))) #s(literal 2 binary64))
▶	99.7%	(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
✓	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/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)))

Compiler

Compiled 100 to 69 computations (31% saved)

series52.0ms (1.6%)

Memory

-16.1MiB live, 30.1MiB allocated; 6ms collecting garbage

Counts

11 → 42

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
36.0ms	a1	@	-inf	((/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (* (cos th) a2) (cos th) th a2 (* (* (cos th) a1) a1) (* (cos th) a1) a1 (sqrt 2) 2)
4.0ms	th	@	-inf	((/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (* (cos th) a2) (cos th) th a2 (* (* (cos th) a1) a1) (* (cos th) a1) a1 (sqrt 2) 2)
2.0ms	th	@	inf	((/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (* (cos th) a2) (cos th) th a2 (* (* (cos th) a1) a1) (* (cos th) a1) a1 (sqrt 2) 2)
2.0ms	th	@	0	((/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (* (cos th) a2) (cos th) th a2 (* (* (cos th) a1) a1) (* (cos th) a1) a1 (sqrt 2) 2)
2.0ms	a1	@	inf	((/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (* (cos th) a2) (cos th) th a2 (* (* (cos th) a1) a1) (* (cos th) a1) a1 (sqrt 2) 2)

rewrite179.0ms (5.4%)

Memory

6.8MiB live, 234.1MiB allocated; 43ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	201	1130
0	216	1019
1	1323	1013
0	8063	931

Stop Event

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

Counts

53 → 124

Calls

Call 1

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

Outputs
(/.f64 (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a1) a1)) (neg.f64 (.f64 (.f64 (cos.f64 th) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a2) a2)) (neg.f64 (.f64 (.f64 (cos.f64 th) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 (cos.f64 th) a2) a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a2) a2))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 th) a2) a2)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (.f64 (*.f64 (cos.f64 th) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a1) a1))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (cos.f64 th) a1) a1)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(/.f64 (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)))) (+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))
(/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))))) (/.f64 (.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))))))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)) (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)))) (fma.f64 (.f64 a1 a1) (cos.f64 th) (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1) (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1))) (fma.f64 (.f64 a2 a2) (cos.f64 th) (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)) (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)) (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (neg.f64 (*.f64 a2 a2)) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1) (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1) (.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (neg.f64 (*.f64 (cos.f64 th) a1)) a1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (*.f64 (cos.f64 th) a2) a2))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (*.f64 (cos.f64 th) a1) a1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1)))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (*.f64 (cos.f64 th) a2) a2)))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (*.f64 (cos.f64 th) a1) a1)))))
(fma.f64 (.f64 a1 a1) (cos.f64 th) (.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (.f64 a2 a2) (cos.f64 th) (.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 (.f64 (cos.f64 th) a1) a1 (.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 (cos.f64 th) (.f64 a1 a1) (.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (cos.f64 th) (.f64 a2 a2) (.f64 (*.f64 (cos.f64 th) a1) a1))
(fma.f64 a1 (.f64 (cos.f64 th) a1) (.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 a2 (.f64 (cos.f64 th) a2) (.f64 (*.f64 (cos.f64 th) a1) a1))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1))))
(-.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (neg.f64 (.f64 a2 a2)) (cos.f64 th)))
(-.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) a1))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2))))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1))))) (/.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 3 binary64)) (+.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 th) a1) a1) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1))))))
(+.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (cos.f64 th) a2) a2))
(+.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (.f64 (.f64 (cos.f64 th) a1) a1))
(*.f64 (cos.f64 th) a2)
(*.f64 a2 (cos.f64 th))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
th
a2
(.f64 (.f64 a1 a1) (cos.f64 th))
(.f64 (.f64 (cos.f64 th) a1) a1)
(.f64 (cos.f64 th) (.f64 a1 a1))
(.f64 a1 (.f64 (cos.f64 th) a1))
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (cos.f64 th))
a1
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (.f64 (.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (.f64 (.f64 (cos.f64 th) a2) a2))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))))
#s(approx (* (* (cos th) a1) a1) (.f64 (.f64 (cos.f64 th) a1) a1))
#s(approx (* (cos th) a1) (*.f64 (cos.f64 th) a1))
#s(approx a1 a1)
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (.f64 (/.f64 (fma.f64 (/.f64 (.f64 a2 a2) a1) (/.f64 (cos.f64 th) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (.f64 (.f64 (cos.f64 th) a1) a1))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (.f64 (fma.f64 (/.f64 (.f64 a2 a2) a1) (/.f64 (cos.f64 th) a1) (cos.f64 th)) (*.f64 a1 a1)))
#s(approx (* (cos th) a2) (*.f64 (cos.f64 th) a2))
#s(approx a2 a2)
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (.f64 (/.f64 (fma.f64 (/.f64 (.f64 a1 a1) a2) (/.f64 (cos.f64 th) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (.f64 (fma.f64 (/.f64 (.f64 a1 a1) a2) (/.f64 (cos.f64 th) a2) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th))) (.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (.f64 (/.f64 (.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (.f64 th th))) (.f64 th th))) (.f64 th th) (/.f64 (fma.f64 a1 a1 (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th) (fma.f64 a1 a1 (.f64 a2 a2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th))) (.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 th th))) (.f64 th th))) (.f64 th th) (fma.f64 a1 a1 (.f64 a2 a2))))
#s(approx (* (cos th) a2) a2)
#s(approx (* (cos th) a2) (fma.f64 (.f64 (.f64 th th) a2) #s(literal -1/2 binary64) a2))
#s(approx (* (cos th) a2) (fma.f64 (fma.f64 (.f64 (.f64 th th) a2) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) a2)) (.f64 th th) a2))
#s(approx (* (cos th) a2) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) a2) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) a2)) (.f64 th th) (.f64 #s(literal -1/2 binary64) a2)) (.f64 th th) a2))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 th th) #s(literal 1/24 binary64)) (.f64 th th)) #s(literal 1/2 binary64)) (.f64 th th) #s(literal 1 binary64)))
#s(approx th th)
#s(approx (* (* (cos th) a1) a1) (*.f64 a1 a1))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (pow.f64 (.f64 th a1) #s(literal 2 binary64)) #s(literal -1/2 binary64) (.f64 a1 a1)))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (fma.f64 (pow.f64 (.f64 th a1) #s(literal 2 binary64)) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 th th) (*.f64 a1 a1)))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (.f64 th a1) #s(literal 2 binary64)) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) (.f64 a1 a1))) (.f64 th th) (.f64 #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 th th) (.f64 a1 a1)))
#s(approx (* (cos th) a1) a1)
#s(approx (* (cos th) a1) (fma.f64 (.f64 (.f64 th th) a1) #s(literal -1/2 binary64) a1))
#s(approx (* (cos th) a1) (fma.f64 (fma.f64 (.f64 (.f64 th th) a1) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) a1)) (.f64 th th) a1))
#s(approx (* (cos th) a1) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) a1) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) a1)) (.f64 th th) (.f64 #s(literal -1/2 binary64) a1)) (.f64 th th) a1))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (.f64 (cos.f64 th) (fma.f64 a1 a1 (.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) (cos.f64 th))

eval14.0ms (0.4%)

Memory: 30.0MiB live, 30.0MiB allocated; 0ms collecting garbage
Compiler: Compiled 3 890 to 532 computations (86.3% saved)

prune113.0ms (3.4%)

Memory

-34.6MiB live, 165.3MiB allocated; 16ms collecting garbage

Pruning

5 alts after pruning (2 fresh and 3 done)

	Pruned	Kept	Total
New	141	0	141
Fresh	0	2	2
Picked	0	1	1
Done	0	2	2
Total	141	5	146

Accuracy

100.0%

Counts

146 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))) #s(literal 2 binary64))
▶	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))) #s(literal 2 binary64))
✓	99.7%	(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
✓	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/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)))

Compiler

Compiled 100 to 69 computations (31% saved)

series19.0ms (0.6%)

Memory

-11.6MiB live, 35.6MiB allocated; 2ms collecting garbage

Counts

13 → 44

Calls

Call 1

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

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

Calls

9 calls:

Time	Variable		Point	Expression
3.0ms	th	@	inf	((/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (* (* (cos th) a1) a1) (* (cos th) a1) (cos th) th a1 (sqrt 2) 2 (* (* (* (sqrt 2) a2) a2) (cos th)) (* (* (sqrt 2) a2) a2) (* (sqrt 2) a2) a2)
2.0ms	a2	@	inf	((/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (* (* (cos th) a1) a1) (* (cos th) a1) (cos th) th a1 (sqrt 2) 2 (* (* (* (sqrt 2) a2) a2) (cos th)) (* (* (sqrt 2) a2) a2) (* (sqrt 2) a2) a2)
2.0ms	th	@	-inf	((/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (* (* (cos th) a1) a1) (* (cos th) a1) (cos th) th a1 (sqrt 2) 2 (* (* (* (sqrt 2) a2) a2) (cos th)) (* (* (sqrt 2) a2) a2) (* (sqrt 2) a2) a2)
2.0ms	a1	@	0	((/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (* (* (cos th) a1) a1) (* (cos th) a1) (cos th) th a1 (sqrt 2) 2 (* (* (* (sqrt 2) a2) a2) (cos th)) (* (* (sqrt 2) a2) a2) (* (sqrt 2) a2) a2)
2.0ms	a2	@	-inf	((/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (* (* (cos th) a1) a1) (* (cos th) a1) (cos th) th a1 (sqrt 2) 2 (* (* (* (sqrt 2) a2) a2) (cos th)) (* (* (sqrt 2) a2) a2) (* (sqrt 2) a2) a2)

rewrite201.0ms (6.1%)

Memory

-12.2MiB live, 265.0MiB allocated; 43ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	200	1490
0	218	1370
1	1267	1364
0	8257	1303

Stop Event

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

Counts

57 → 119

Calls

Call 1

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

Outputs
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)))) (-.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))) #s(literal 2 binary64))
(-.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (/.f64 (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)))
(+.f64 (/.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)))) (fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 a2 (cos.f64 th)))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 (.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 3 binary64))) (pow.f64 (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)) #s(literal 3 binary64))) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 2 binary64)) (fma.f64 (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)) (.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 3 binary64)) (.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 a2 (cos.f64 th))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64))) (fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 a2 (cos.f64 th)))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 3 binary64))) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))))))
(fma.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th) (.f64 (.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) (cos.f64 th)))
(fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))
(fma.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1) (.f64 (neg.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) (cos.f64 th)))
(fma.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a1 a1) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))
(fma.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (.f64 a2 (cos.f64 th)) (.f64 (.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (neg.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) (cos.f64 th)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 th) a1) a1) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))
(fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (neg.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) (cos.f64 th)))
(fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))
(fma.f64 (.f64 (cos.f64 th) a1) (.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (neg.f64 (neg.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) (cos.f64 th)))
(fma.f64 (.f64 (cos.f64 th) a1) (.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))
(fma.f64 (cos.f64 th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (.f64 (.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 2 binary64)) (fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (.f64 a2 (cos.f64 th))))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (fma.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (.f64 a2 (cos.f64 th))))))
(-.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (.f64 a2 (cos.f64 th))))
(-.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (neg.f64 (cos.f64 th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))
(-.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (cos.f64 th)))
(-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (neg.f64 (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (neg.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 a1 a1)))
(-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 th) a1) a1)))
(-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (neg.f64 (.f64 (.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (neg.f64 (.f64 (cos.f64 th) a1)) (.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 3 binary64))) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))))) (/.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 3 binary64)) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))))))
(+.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (neg.f64 (neg.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))) (cos.f64 th)))
(+.f64 (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)))
(+.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th)) (.f64 (.f64 a1 a1) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(.f64 (.f64 a1 a1) (cos.f64 th))
(.f64 (.f64 (cos.f64 th) a1) a1)
(.f64 (cos.f64 th) (.f64 a1 a1))
(.f64 a1 (.f64 (cos.f64 th) a1))
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (cos.f64 th))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 th (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
th
a1
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (cos.f64 th)))
(.f64 (cos.f64 th) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(.f64 (.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 a2 a2))
(.f64 a2 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)
(*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 a2 a2)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (* (cos th) a1) a1) (.f64 (.f64 (cos.f64 th) a1) a1))
#s(approx (* (cos th) a1) (*.f64 (cos.f64 th) a1))
#s(approx a1 a1)
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 a1 a1)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (.f64 a1 a1)))) (*.f64 a1 a1)))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (.f64 (.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (.f64 a2 a2)) (.f64 a1 a1))) (.f64 a1 a1)))
#s(approx (* (* (* (sqrt 2) a2) a2) (cos th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (* (* (sqrt 2) a2) a2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
#s(approx (* (sqrt 2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
#s(approx a2 a2)
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (.f64 a2 a2)))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (.f64 (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 (.f64 (.f64 (cos.f64 th) a1) a1) a2) (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (.f64 th th) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (.f64 th th) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (.f64 th th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (fma.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 #s(literal -1/720 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (.f64 th th) (.f64 #s(literal 1/24 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))))) (.f64 th th) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) #s(literal 1/2 binary64))) (.f64 th th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 1/2 binary64))))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (.f64 th th))))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 #s(literal 1/24 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (.f64 th th))) (.f64 th th))))
#s(approx (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (fma.f64 #s(literal 1/24 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2))) (.f64 (.f64 #s(literal -1/720 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (.f64 a2 a2)))) (.f64 th th))) (.f64 th th))) (.f64 th th))))
#s(approx (* (* (cos th) a1) a1) (*.f64 a1 a1))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (pow.f64 (.f64 th a1) #s(literal 2 binary64)) #s(literal -1/2 binary64) (.f64 a1 a1)))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (fma.f64 (pow.f64 (.f64 th a1) #s(literal 2 binary64)) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 th th) (*.f64 a1 a1)))
#s(approx (* (* (cos th) a1) a1) (fma.f64 (fma.f64 (fma.f64 (pow.f64 (.f64 th a1) #s(literal 2 binary64)) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) (.f64 a1 a1))) (.f64 th th) (.f64 #s(literal -1/2 binary64) (.f64 a1 a1))) (.f64 th th) (.f64 a1 a1)))
#s(approx (* (cos th) a1) a1)
#s(approx (* (cos th) a1) (fma.f64 (.f64 (.f64 th th) a1) #s(literal -1/2 binary64) a1))
#s(approx (* (cos th) a1) (fma.f64 (fma.f64 (.f64 (.f64 th th) a1) #s(literal 1/24 binary64) (.f64 #s(literal -1/2 binary64) a1)) (.f64 th th) a1))
#s(approx (* (cos th) a1) (fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 th th) a1) #s(literal -1/720 binary64) (.f64 #s(literal 1/24 binary64) a1)) (.f64 th th) (.f64 #s(literal -1/2 binary64) a1)) (.f64 th th) a1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (-.f64 (.f64 #s(literal 1/24 binary64) (.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) (fma.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/720 binary64) (.f64 th th) #s(literal 1/24 binary64)) (.f64 th th)) #s(literal 1/2 binary64)) (.f64 th th) #s(literal 1 binary64)))
#s(approx th th)
#s(approx (* (* (* (sqrt 2) a2) a2) (cos th)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
#s(approx (* (* (* (sqrt 2) a2) a2) (cos th)) (fma.f64 (.f64 (pow.f64 (.f64 a2 th) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))
#s(approx (* (* (* (sqrt 2) a2) a2) (cos th)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (.f64 a2 th) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/24 binary64))) (.f64 th th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))
#s(approx (* (* (* (sqrt 2) a2) a2) (cos th)) (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (fma.f64 (.f64 #s(literal 1/24 binary64) (.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (.f64 a2 th) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/720 binary64))) (.f64 th th))) (.f64 th th) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))
#s(approx (/ (+ (* (* (* (cos th) a1) a1) (sqrt 2)) (* (* (* (sqrt 2) a2) a2) (cos th))) 2) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (.f64 a2 a2))) #s(literal 1/2 binary64)))
#s(approx (cos th) (cos.f64 th))

eval17.0ms (0.5%)

Memory: -11.5MiB live, 35.1MiB allocated; 2ms collecting garbage
Compiler: Compiled 4 409 to 565 computations (87.2% saved)

prune174.0ms (5.3%)

Memory

-3.1MiB live, 234.2MiB allocated; 17ms collecting garbage

Pruning

5 alts after pruning (1 fresh and 4 done)

	Pruned	Kept	Total
New	143	1	144
Fresh	1	0	1
Picked	0	1	1
Done	0	3	3
Total	144	5	149

Accuracy

100.0%

Counts

149 → 5

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (cos.f64 th))) #s(literal 2 binary64))
	99.6%	(/.f64 (fma.f64 (.f64 (.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal 2 binary64))
✓	99.7%	(/.f64 (fma.f64 (.f64 (cos.f64 th) a2) a2 (.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
✓	99.6%	(+.f64 (.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (.f64 a1 a1)) (.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/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)))

Compiler

Compiled 216 to 109 computations (49.5% saved)

regimes18.0ms (0.5%)

Memory

-6.7MiB live, 40.1MiB allocated; 1ms collecting garbage

Accuracy

Total -0.3b remaining (-158.3%)

Threshold costs -0.3b (-158.3%)

Counts

6 → 1

Calls

Call 1

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

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

Calls

8 calls:

3.0ms	(*.f64 a1 a1)
2.0ms	th
2.0ms	a1
2.0ms	a2
2.0ms	(+.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)))

Results

Accuracy	Segments	Branch
99.7%	1	`(*.f64 a2 a2)`
99.7%	1	`(*.f64 a1 a1)`
99.7%	1	`(cos.f64 th)`
99.7%	1	`(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))`
99.7%	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.7%	1	`a1`
99.7%	1	`a2`
99.7%	1	`th`

Compiler

Compiled 35 to 40 computations (-14.3% saved)

simplify38.0ms (1.2%)

Memory

-1.3MiB live, 49.5MiB allocated; 6ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	11	15
1	13	15
2	16	15
3	22	15
4	54	15
5	376	15
6	3451	15

Stop Event

1×	node limit

Calls

Call 1

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

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

derivations29.0ms (0.9%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 15 to 11 computations (26.7% saved)

preprocess19.0ms (0.6%)

Memory

-11.0MiB live, 35.3MiB allocated; 2ms collecting garbage

Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 188 to 134 computations (28.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze0.0ms (0%)

sample1.1s (34.4%)

explain136.0ms (4.1%)

preprocess210.0ms (6.4%)

eval0.0ms (0%)

prune0.0ms (0%)

series20.0ms (0.6%)

rewrite193.0ms (5.8%)

eval20.0ms (0.6%)

prune216.0ms (6.5%)

series15.0ms (0.5%)

rewrite162.0ms (4.9%)

eval24.0ms (0.7%)

prune298.0ms (9%)

series52.0ms (1.6%)

rewrite179.0ms (5.4%)

eval14.0ms (0.4%)

prune113.0ms (3.4%)

series19.0ms (0.6%)

rewrite201.0ms (6.1%)

eval17.0ms (0.5%)

prune174.0ms (5.3%)

regimes18.0ms (0.5%)

simplify38.0ms (1.2%)

derivations29.0ms (0.9%)

preprocess19.0ms (0.6%)

end0.0ms (0%)

Profiling