Migdal et al, Equation (64)

Time bar (total: 8.9s)

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
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
100%99.9%0%0.1%0%0%0%1
Compiler

Compiled 21 to 14 computations (33.3% saved)

sample1.3s (14.6%)

Memory
9.8MiB live, 1 807.7MiB allocated; 211ms collecting garbage
Samples
944.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 670.0ms
ival-cos: 243.0ms (36.3% of total)
ival-mult: 187.0ms (27.9% of total)
ival-sqrt: 102.0ms (15.2% of total)
ival-div: 64.0ms (9.6% of total)
ival-add: 56.0ms (8.4% of total)
exact: 6.0ms (0.9% of total)
ival-true: 5.0ms (0.7% of total)
ival-assert: 3.0ms (0.4% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

explain217.0ms (2.4%)

Memory
-14.2MiB live, 315.5MiB allocated; 109ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
00-0-a1
00-0-(*.f64 a1 a1)
00-0-(sqrt.f64 #s(literal 2 binary64))
00-0-th
00-0-#s(literal 2 binary64)
00-0-(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
00-0-(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
00-0-(+.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)))
00-0-(*.f64 a2 a2)
00-0-(cos.f64 th)
00-0-(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
00-0-a2
Confusion
Predicted +Predicted -
+00
-0256
Precision
0/0
Recall
0/0
Confusion?
Predicted +Predicted MaybePredicted -
+000
-00256
Precision?
0/0
Recall?
0/0
Freqs
test
numberfreq
0256
Total Confusion?
Predicted +Predicted MaybePredicted -
+000
-001
Precision?
0/0
Recall?
0/0
Samples
90.0ms512×0valid
Compiler

Compiled 135 to 40 computations (70.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 62.0ms
ival-mult: 27.0ms (43.5% of total)
ival-add: 15.0ms (24.1% of total)
ival-cos: 12.0ms (19.3% of total)
ival-sqrt: 4.0ms (6.4% of total)
ival-div: 3.0ms (4.8% 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)

preprocess171.0ms (1.9%)

Memory
23.1MiB live, 211.9MiB allocated; 22ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
040120
1163120
2592120
31529120
42996120
54325120
66209120
01219
02013
15213
217313
354513
4108813
5159113
6227013
7361213
8608113
0809712
Stop Event
iter limit
node limit
iter limit
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 th)

(abs a2)

(abs a1)

(sort a1 a2)

Compiler

Compiled 19 to 12 computations (36.8% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.5%
(+.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)

simplify177.0ms (2%)

Memory
-8.4MiB live, 151.0MiB allocated; 93ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(cos.f64 th)
cost-diff0
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
cost-diff7
(+.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)))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01256
02050
15250
217350
354550
4108850
5159150
6227050
7361250
8608150
0809749
Stop Event
iter limit
node limit
iter 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)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a1 a1)
a1
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 a2)
a2
Outputs
(+.f64 (*.f64 (/.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))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (cos.f64 th)))
(/.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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 a2 a2)
a2

localize34.0ms (0.4%)

Memory
12.0MiB live, 58.4MiB allocated; 2ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.00390625
(+.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)))
accuracy0.1484375
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
accuracy0.18197250976844204
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
accuracy0.693691259768442
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Samples
26.0ms256×0valid
Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-mult: 6.0ms (34.5% of total)
ival-cos: 6.0ms (34.5% of total)
ival-sqrt: 3.0ms (17.2% of total)
ival-div: 1.0ms (5.7% of total)
ival-add: 1.0ms (5.7% 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)

series19.0ms (0.2%)

Memory
-12.2MiB live, 34.2MiB allocated; 5ms collecting garbage
Counts
5 → 27
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)
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
Outputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(+ (/ (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 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 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))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* (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)))
(+ (* (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)))
(/ 1 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (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)))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
(/ (cos th) (sqrt 2))
(cos th)
Calls

9 calls:

TimeVariablePointExpression
5.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) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
3.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) (* (/ (cos th) (sqrt 2)) (* 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) (* (/ (cos th) (sqrt 2)) (* 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) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
1.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) (* (/ (cos th) (sqrt 2)) (* a2 a2)))

simplify297.0ms (3.3%)

Memory
13.5MiB live, 278.6MiB allocated; 67ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0111543
1388508
21688439
35754424
08567387
Stop Event
iter limit
node limit
Counts
27 → 27
Calls
Call 1
Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(+ (/ (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 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 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))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* (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)))
(+ (* (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)))
(/ 1 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (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)))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
(/ (cos th) (sqrt 2))
(cos th)
Outputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 th th)))
(/ (pow a1 2) (sqrt 2))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(+ (* (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)))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 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)))
(/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 a1 a1) (*.f64 (*.f64 (*.f64 a1 a1) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/ 1 (sqrt 2))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 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)))
(fma.f64 (/.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (fma.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64))) (*.f64 th th) #s(literal 1 binary64))
(/ (pow a2 2) (sqrt 2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(+ (* (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)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)))
(/.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (pow.f64 th #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos th)
(cos.f64 th)

rewrite251.0ms (2.8%)

Memory
4.1MiB live, 237.9MiB allocated; 47ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01244
02038
17238
250538
3707938
0882237
Stop Event
iter limit
node limit
iter limit
Counts
5 → 236
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)
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
Outputs
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (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 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (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 a1 #s(literal 6 binary64)))) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 (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 a1 #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))))
(*.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))) (fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))) (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (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 a1 #s(literal 6 binary64)))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64))) (*.f64 (*.f64 (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 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 9 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (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 a1 #s(literal 6 binary64))))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (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 a1 #s(literal 6 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (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 a1 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(neg.f64 (/.f64 (*.f64 (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 a1 #s(literal 6 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (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 a2 #s(literal 6 binary64))))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #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 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 3 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) a1) (/.f64 a1 (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (fabs.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (/.f64 (pow.f64 a1 #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 3 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 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 (neg.f64 a2) a2) (/.f64 (neg.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 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 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 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.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 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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 a1 (cos.f64 th)) (/.f64 a1 (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 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.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 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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 (/.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th))) (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th)))) (-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th))))))
(neg.f64 (neg.f64 (cos.f64 th)))
(fma.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(fma.f64 #s(literal 0 binary64) (sin.f64 th) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(fma.f64 (sin.f64 th) #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(fma.f64 #s(literal 1 binary64) (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(fma.f64 (cos.f64 th) #s(literal 1 binary64) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(sin.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(-.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) th) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (/.f64 (PI.f64) #s(literal 2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 th)) (*.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a2))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.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 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))

eval52.0ms (0.6%)

Memory
24.4MiB live, 70.2MiB allocated; 3ms collecting garbage
Compiler

Compiled 11 155 to 899 computations (91.9% saved)

prune81.0ms (0.9%)

Memory
0.5MiB live, 51.5MiB allocated; 55ms collecting garbage
Pruning

15 alts after pruning (15 fresh and 0 done)

PrunedKeptTotal
New28815303
Fresh000
Picked101
Done000
Total28915304
Accuracy
100.0%
Counts
304 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
99.7%
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
99.7%
(/.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
99.6%
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
99.6%
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (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 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))))
99.5%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
99.5%
(*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
99.5%
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
38.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
64.3%
#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))))
59.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
99.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
59.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
98.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
Compiler

Compiled 736 to 476 computations (35.3% saved)

simplify172.0ms (1.9%)

Memory
0.0MiB live, 191.0MiB allocated; 20ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 a2 a1)
cost-diff0
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
cost-diff0
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
cost-diff0
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(cos.f64 th)
cost-diff0
(*.f64 (cos.f64 th) a2)
cost-diff0
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
(*.f64 a1 a1)
cost-diff0
(fma.f64 a2 a2 (*.f64 a1 a1))
cost-diff0
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#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))))
cost-diff0
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))
cost-diff0
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
cost-diff2
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))
cost-diff8
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
042330
069309
1165303
2505287
31756287
45083287
08137287
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))
(*.f64 a2 (cos.f64 th))
a2
(cos.f64 th)
th
(neg.f64 a2)
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))
(*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))
(*.f64 a1 (cos.f64 th))
a1
(neg.f64 a1)
#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))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) a2)
(cos.f64 th)
th
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
a1
#s(literal 1 binary64)
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) a1)
(cos.f64 th)
th
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))
(*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))
(*.f64 a2 (cos.f64 th))
(*.f64 (cos.f64 th) a2)
a2
(cos.f64 th)
th
(neg.f64 a2)
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))
(*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))
(*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))
(*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))
(*.f64 a1 (cos.f64 th))
a1
(neg.f64 a1)
#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))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(cos.f64 th)
th
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
a2
(*.f64 a1 a1)
a1
(cos.f64 th)
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
a1
#s(literal 1 binary64)
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (cos.f64 th))
(cos.f64 th)
th
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize131.0ms (1.5%)

Memory
-29.9MiB live, 156.0MiB allocated; 15ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.15625
(*.f64 (cos.f64 th) a1)
accuracy0.213222509768442
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
accuracy0.3984375
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy24.100409121610607
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.07421875
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
accuracy0.24609375
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.12109375
(*.f64 (cos.f64 th) a2)
accuracy0.1640625
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
accuracy0.44140625
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.695265717701468
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.0
(*.f64 a1 a1)
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.2741012695368841
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy22.69272203413039
#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))))
accuracy0.12109375
(*.f64 a2 (cos.f64 th))
accuracy0.15625
(*.f64 a1 (cos.f64 th))
accuracy0.1640625
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
accuracy0.21484375
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))
Samples
101.0ms256×0valid
Compiler

Compiled 302 to 40 computations (86.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 78.0ms
ival-add: 29.0ms (37.2% of total)
ival-mult: 23.0ms (29.5% of total)
ival-div: 15.0ms (19.2% of total)
ival-cos: 6.0ms (7.7% of total)
ival-neg: 3.0ms (3.8% of total)
ival-sqrt: 2.0ms (2.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)

series49.0ms (0.5%)

Memory
30.8MiB live, 76.8MiB allocated; 3ms collecting garbage
Counts
24 → 90
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 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))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) a2)
(cos.f64 th)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
(*.f64 a1 (cos.f64 th))
(*.f64 a2 (cos.f64 th))
(sqrt.f64 #s(literal 2 binary64))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) a1)
Outputs
(* (pow a2 2) (* (cos th) (sqrt 2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(/ (pow a2 2) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ a2 a1)
(* a1 (cos th))
(/ a1 (sqrt 2))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(* -1 (* (pow a2 2) (cos th)))
(* a2 (cos th))
(/ a2 (sqrt 2))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (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 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 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)))))))))))))
(* (pow a1 2) (sqrt 2))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (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)) (* (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))))))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 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)))))
(+ (* 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))))))))
(+ (* 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))))))))))
(* -1 (pow a2 2))
(+ (* -1 (pow a2 2)) (* 1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1 (pow a2 2)) (* (pow th 2) (+ (* -1/24 (* (pow a2 2) (pow th 2))) (* 1/2 (pow a2 2)))))
(+ (* -1 (pow a2 2)) (* (pow th 2) (+ (* 1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/24 (pow a2 2)) (* 1/720 (* (pow a2 2) (pow th 2))))))))
(+ (* (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))))
(+ (* (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))))
(+ (* (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))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
a1
(+ a1 (* -1/2 (* a1 (pow th 2))))
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(cos th)
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
Calls

9 calls:

TimeVariablePointExpression
9.0ms
a2
@inf
((+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* a2 (cos th)) (neg a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (* (cos th) a2) (cos th) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (* a1 (cos th)) (* a2 (cos th)) (sqrt 2) (/ a2 (sqrt 2)) (/ a1 (sqrt 2)) (* (cos th) a1))
7.0ms
a2
@0
((+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* a2 (cos th)) (neg a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (* (cos th) a2) (cos th) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (* a1 (cos th)) (* a2 (cos th)) (sqrt 2) (/ a2 (sqrt 2)) (/ a1 (sqrt 2)) (* (cos th) a1))
5.0ms
th
@inf
((+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* a2 (cos th)) (neg a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (* (cos th) a2) (cos th) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (* a1 (cos th)) (* a2 (cos th)) (sqrt 2) (/ a2 (sqrt 2)) (/ a1 (sqrt 2)) (* (cos th) a1))
5.0ms
th
@-inf
((+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* a2 (cos th)) (neg a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (* (cos th) a2) (cos th) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (* a1 (cos th)) (* a2 (cos th)) (sqrt 2) (/ a2 (sqrt 2)) (/ a1 (sqrt 2)) (* (cos th) a1))
5.0ms
a1
@0
((+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* a2 (cos th)) (neg a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (* (cos th) a2) (cos th) (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (+ (* (/ a2 a1) (/ a2 a1)) 1) (/ a2 a1) (* a1 (cos th)) (* a2 (cos th)) (sqrt 2) (/ a2 (sqrt 2)) (/ a1 (sqrt 2)) (* (cos th) a1))

simplify689.0ms (7.7%)

Memory
-162.0MiB live, 187.2MiB allocated; 867ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02931825
111701676
257161652
083201518
Stop Event
iter limit
node limit
Counts
90 → 88
Calls
Call 1
Inputs
(* (pow a2 2) (* (cos th) (sqrt 2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(/ (pow a2 2) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ a2 a1)
(* a1 (cos th))
(/ a1 (sqrt 2))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(* -1 (* (pow a2 2) (cos th)))
(* a2 (cos th))
(/ a2 (sqrt 2))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(+ (* (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 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 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)))))))))))))
(* (pow a1 2) (sqrt 2))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (sqrt 2)))
(+ (* (pow a1 2) (sqrt 2)) (* (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)) (* (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))))))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 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)))))
(+ (* 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))))))))
(+ (* 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))))))))))
(* -1 (pow a2 2))
(+ (* -1 (pow a2 2)) (* 1/2 (* (pow a2 2) (pow th 2))))
(+ (* -1 (pow a2 2)) (* (pow th 2) (+ (* -1/24 (* (pow a2 2) (pow th 2))) (* 1/2 (pow a2 2)))))
(+ (* -1 (pow a2 2)) (* (pow th 2) (+ (* 1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/24 (pow a2 2)) (* 1/720 (* (pow a2 2) (pow th 2))))))))
(+ (* (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))))
(+ (* (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))))
(+ (* (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))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
a1
(+ a1 (* -1/2 (* a1 (pow th 2))))
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(cos th)
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
Outputs
(* (pow a2 2) (* (cos th) (sqrt 2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
(+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* (pow a1 2) (* (cos th) (sqrt 2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(/ (pow a2 2) (pow a1 2))
(*.f64 (/.f64 a2 a1) (/.f64 a2 a1))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/ a2 a1)
(/.f64 a2 a1)
(* a1 (cos th))
(*.f64 (cos.f64 th) a1)
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2))))
(*.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))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a1 a1)) (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))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.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))
(/ (pow a1 2) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 a1 a1))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(* -1 (* (pow a2 2) (cos th)))
(*.f64 (neg.f64 a2) (*.f64 (cos.f64 th) a2))
(* a2 (cos th))
(*.f64 (cos.f64 th) a2)
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* (cos th) (sqrt 2)) (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2))))
(*.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))) (*.f64 a2 a2))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.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))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (fma.f64 (/.f64 (*.f64 a1 a1) a2) (/.f64 (cos.f64 th) a2) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) (*.f64 (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))))
(+ (* (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)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (*.f64 (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))))
(* (pow a1 2) (sqrt 2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (sqrt 2)))) (* (pow a1 2) (sqrt 2)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a1 2) (sqrt 2)) (* (pow th 2) (+ (* -1/2 (* (pow a1 2) (sqrt 2))) (* 1/24 (* (pow a1 2) (* (pow th 2) (sqrt 2)))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 th th)))
(+ (* (pow a1 2) (sqrt 2)) (* (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))))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))) (*.f64 th th)))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* 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)))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 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))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 th th) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(+ (* 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))))))))))
(fma.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) (fma.f64 (*.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 th th) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(* -1 (pow a2 2))
(*.f64 (neg.f64 a2) a2)
(+ (* -1 (pow a2 2)) (* 1/2 (* (pow a2 2) (pow th 2))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) th) th (*.f64 (neg.f64 a2) a2))
(+ (* -1 (pow a2 2)) (* (pow th 2) (+ (* -1/24 (* (pow a2 2) (pow th 2))) (* 1/2 (pow a2 2)))))
(fma.f64 (neg.f64 a2) a2 (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 a2 a2)) th) th (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2))) (*.f64 th th)))
(+ (* -1 (pow a2 2)) (* (pow th 2) (+ (* 1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/24 (pow a2 2)) (* 1/720 (* (pow a2 2) (pow th 2))))))))
(fma.f64 (neg.f64 a2) a2 (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) a2) a2 (*.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 a2 a2)) th) th (*.f64 #s(literal -1/24 binary64) (*.f64 a2 a2))) (*.f64 th th))) (*.f64 th th)))
(+ (* (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))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 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))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 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))))
(+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)))
(fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 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)))
(+.f64 (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/720 binary64) a2) a2) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) a2 a2)
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(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)
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 th th) a2) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) a2)) th) th (*.f64 #s(literal -1/2 binary64) a2)) (*.f64 th th) a2)
(+ 1 (* -1/2 (pow th 2)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(fma.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/.f64 (fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
a1
(+ a1 (* -1/2 (* a1 (pow th 2))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) a1) (*.f64 th th) a1)
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))
(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)
(+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) a1)) th) th (*.f64 #s(literal -1/2 binary64) a1)) (*.f64 th th) a1)
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(cos th)
(cos.f64 th)
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(*.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))

rewrite272.0ms (3%)

Memory
-18.5MiB live, 212.5MiB allocated; 45ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
042265
069253
1234244
21698226
08813225
Stop Event
iter limit
node limit
iter limit
Counts
24 → 935
Calls
Call 1
Inputs
(fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 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))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) a2)
(cos.f64 th)
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
(*.f64 a1 (cos.f64 th))
(*.f64 a2 (cos.f64 th))
(sqrt.f64 #s(literal 2 binary64))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) a1)
Outputs
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))))) (*.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))))
(/.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))))
(neg.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (neg.f64 a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.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 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (cos.f64 th) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) a2) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (*.f64 a1 (cos.f64 th)) (*.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(fma.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (neg.f64 a1) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 a1 (*.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(fma.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (neg.f64 a2) (*.f64 (*.f64 (cos.f64 th) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 (cos.f64 th) (*.f64 a2 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 a2 (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(fma.f64 a2 (*.f64 (cos.f64 th) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a1) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 (neg.f64 a1) (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 (neg.f64 a1) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (*.f64 (*.f64 (neg.f64 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 a1) a1) (cos.f64 th)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))
(neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a1))
(neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.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 a1 (cos.f64 th)) a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) #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 (neg.f64 (cos.f64 th)) (*.f64 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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 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 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (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 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.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 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (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 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #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 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))) #s(literal 4 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 a1 (cos.f64 th)) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64)))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #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 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64)))
(/.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))))
(/.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal -2 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (fabs.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fabs.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a1 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(-.f64 (/.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) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))) (/.f64 (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #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 (cos.f64 th) a2) a2) #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 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) #s(literal 4 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))))
(+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) #s(literal 2 binary64)) (/.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #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 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(+.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) a2)
(*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))
(*.f64 (neg.f64 a2) (*.f64 (cos.f64 th) a2))
(*.f64 (*.f64 (cos.f64 th) a2) (neg.f64 a2))
(*.f64 (cos.f64 th) (*.f64 a2 (neg.f64 a2)))
(*.f64 a2 (*.f64 (neg.f64 a2) (cos.f64 th)))
(neg.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (fma.f64 (neg.f64 a1) a1 (*.f64 a2 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 (neg.f64 a2) (*.f64 (neg.f64 a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (neg.f64 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 a2 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 a2 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))) (*.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) #s(literal 3 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (neg.f64 a2) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 a2 (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 (neg.f64 a2) a1)) (/.f64 (neg.f64 a2) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 (neg.f64 a2) a1)) (/.f64 a2 (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 a2 (neg.f64 a1))) (/.f64 (neg.f64 a2) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 a2 (neg.f64 a1))) (/.f64 a2 (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 a2 a1)) (/.f64 (neg.f64 a2) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (+.f64 a2 a1)) (/.f64 a2 (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) a2) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (neg.f64 a2) a2) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) a2) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (neg.f64 a2) a2) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) a2) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (neg.f64 a2) a2) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) a2) (+.f64 a2 a1)) (/.f64 (*.f64 (neg.f64 a2) a2) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 (neg.f64 a2)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 a2 (neg.f64 a2)) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 (neg.f64 a2)) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 a2 (neg.f64 a2)) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 (neg.f64 a2)) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 a2 (neg.f64 a2)) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 (neg.f64 a2)) (+.f64 a2 a1)) (/.f64 (*.f64 a2 (neg.f64 a2)) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (neg.f64 (*.f64 a2 a2)) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) (+.f64 (neg.f64 a2) a1)) (/.f64 (neg.f64 (*.f64 a2 a2)) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) (+.f64 a2 (neg.f64 a1))) (/.f64 (neg.f64 (*.f64 a2 a2)) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 a2)) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 a2) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 a2 a2) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 a2) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 a2 a2) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 a2) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 a2 a2) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (/.f64 (*.f64 a2 a2) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 a2) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 a2) (+.f64 (neg.f64 a2) a1)) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 a2) (+.f64 a2 (neg.f64 a1))) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 (neg.f64 a2) (+.f64 a2 a1)) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 a2 (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 a2 (+.f64 (neg.f64 a2) a1)) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 a2 (+.f64 a2 (neg.f64 a1))) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (/.f64 a2 (+.f64 a2 a1)) (/.f64 (pow.f64 a2 #s(literal 3 binary64)) (-.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a1 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a1)) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (pow.f64 a1 #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2)
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) 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 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (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 (cos.f64 th) a2)
(*.f64 a2 (cos.f64 th))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))))
(fma.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 (sin.f64 th) #s(literal 0 binary64) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th)))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (neg.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 a1 (cos.f64 th)) a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)))) (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)))) (*.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) #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 (neg.f64 (cos.f64 th)) (*.f64 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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.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) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 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 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (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 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)) (*.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 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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 (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 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)))) (neg.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #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 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (neg.f64 (cos.f64 th))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))) #s(literal 4 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 a1 (cos.f64 th)) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64)))
(/.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #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 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 3 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64))) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64)))
(/.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))))
(/.f64 (/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))
(neg.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal -2 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (fabs.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fabs.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a1 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(-.f64 (/.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) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))) (/.f64 (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #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 (cos.f64 th) a2) a2) #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 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2)) (neg.f64 a2)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) #s(literal 4 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))))) #s(literal 2 binary64))))
(+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) #s(literal 2 binary64)) (/.f64 (/.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3/2 binary64)) (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th))))))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 a1 (cos.f64 th)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) 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 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) #s(literal 3 binary64)) (+.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #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 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64))))
(+.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (cos.f64 th) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (cos.f64 th) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (cos.f64 th) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (cos.f64 th) (-.f64 a2 a1)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (cos.f64 th) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 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 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (neg.f64 a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 a1 (cos.f64 th)) a1 (*.f64 (*.f64 (cos.f64 th) a2) a2))
(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 a1 (cos.f64 th)) a1))
(fma.f64 a1 (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (cos.f64 th)) a1))
(fma.f64 a2 (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (/.f64 a2 a1) #s(literal 1 binary64))) (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 a2 a1) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (cos.f64 th)))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (cos.f64 th) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 a2 a1) #s(literal 1 binary64))) (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 a2 a1) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (-.f64 (*.f64 (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)) (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a2)) a1) (/.f64 (neg.f64 (neg.f64 a2)) a1) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 (neg.f64 (neg.f64 a1))) (/.f64 a2 (neg.f64 (neg.f64 a1))) #s(literal 1 binary64))
(fma.f64 (exp.f64 (log.f64 (/.f64 a2 a1))) (exp.f64 (log.f64 (/.f64 a2 a1))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (neg.f64 a2) a2) a1) (/.f64 #s(literal 1 binary64) (neg.f64 a1)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 a2 a1) a2) (/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 a1))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 a2 a1) a2) (/.f64 #s(literal 1 binary64) a1) #s(literal 1 binary64))
(fma.f64 (/.f64 (neg.f64 a2) a1) (*.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (neg.f64 a2) a1) (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 a1) (fabs.f64 (*.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(fma.f64 (neg.f64 a2) (/.f64 a2 (*.f64 (neg.f64 a1) a1)) #s(literal 1 binary64))
(fma.f64 a2 (fabs.f64 (/.f64 (/.f64 a2 a1) a1)) #s(literal 1 binary64))
(fma.f64 a2 (/.f64 (/.f64 a2 a1) a1) #s(literal 1 binary64))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (neg.f64 a2) a1) (/.f64 a2 a1)))
(-.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 a1) (/.f64 (neg.f64 a2) a1)))
(+.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))) (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))))
(+.f64 (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))) (pow.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal -1 binary64)))
(+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 a2) a1)) (sqrt.f64 (*.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (/.f64 (neg.f64 a2) a1)) (sqrt.f64 (/.f64 (neg.f64 a2) a1)))
(*.f64 (sqrt.f64 (/.f64 a2 a1)) (sqrt.f64 (/.f64 a2 a1)))
(*.f64 (sqrt.f64 (neg.f64 a2)) (sqrt.f64 (/.f64 a2 (*.f64 (neg.f64 a1) a1))))
(*.f64 (sqrt.f64 a2) (sqrt.f64 (/.f64 (/.f64 a2 a1) a1)))
(*.f64 (sqrt.f64 a2) (sqrt.f64 (/.f64 a2 (*.f64 a1 a1))))
(*.f64 #s(literal 1 binary64) (/.f64 a2 a1))
(*.f64 (/.f64 a2 a1) #s(literal 1 binary64))
(pow.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a1))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 (neg.f64 a2) a2) a1)) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (*.f64 (*.f64 (/.f64 a2 a1) a2) #s(literal 1 binary64))) (sqrt.f64 a1))
(/.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) a1)
(/.f64 (sqrt.f64 (*.f64 (neg.f64 a2) (/.f64 a2 a1))) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 a2 a1) (neg.f64 a2))) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (/.f64 a2 a1) a2))) (sqrt.f64 (neg.f64 a1)))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 (*.f64 (neg.f64 a1) a1)))
(/.f64 (sqrt.f64 (*.f64 a2 (neg.f64 a2))) (sqrt.f64 (*.f64 (neg.f64 a1) a1)))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 a2 a2))) (sqrt.f64 (*.f64 (neg.f64 a1) a1)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 a2 a1) a2)) (sqrt.f64 a1))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a1)))
(/.f64 (neg.f64 a2) (neg.f64 a1))
(/.f64 a2 a1)
(neg.f64 (/.f64 (neg.f64 a2) a1))
(sqrt.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))
(fabs.f64 (/.f64 (neg.f64 a2) a1))
(fabs.f64 (/.f64 a2 a1))
(exp.f64 (/.f64 (log.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 a2 a1)) #s(literal 1 binary64)))
(*.f64 a1 (cos.f64 th))
(*.f64 (cos.f64 th) a1)
(*.f64 (cos.f64 th) a2)
(*.f64 a2 (cos.f64 th))
(*.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 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 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))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)))
(*.f64 a1 (cos.f64 th))
(*.f64 (cos.f64 th) a1)

eval165.0ms (1.8%)

Memory
42.4MiB live, 182.6MiB allocated; 24ms collecting garbage
Compiler

Compiled 41 180 to 3 532 computations (91.4% saved)

prune63.0ms (0.7%)

Memory
-6.7MiB live, 82.8MiB allocated; 12ms collecting garbage
Pruning

27 alts after pruning (27 fresh and 0 done)

PrunedKeptTotal
New1 029261 055
Fresh9110
Picked505
Done000
Total1 043271 070
Accuracy
100.0%
Counts
1 070 → 27
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.8%
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 2 binary64))
99.6%
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
99.6%
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
98.5%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
98.6%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
64.5%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
64.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
64.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
64.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
55.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
41.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
59.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
98.5%
#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))) (*.f64 a2 a2)))
98.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
98.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
98.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
58.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
58.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
41.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
64.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
63.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
15.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
23.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
25.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
25.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
Compiler

Compiled 1 992 to 1 202 computations (39.7% saved)

simplify160.0ms (1.8%)

Memory
-10.6MiB live, 133.8MiB allocated; 20ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
cost-diff0
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
cost-diff0
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
cost-diff0
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
cost-diff0
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff2
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
cost-diff0
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
cost-diff0
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
061448
091414
1212411
2694400
32720400
46941400
08510396
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
(*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)
(*.f64 #s(literal -1/2 binary64) a2)
#s(literal -1/2 binary64)
a2
(*.f64 th th)
th
(*.f64 a2 a2)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
a1
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 a2 a2))
(*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)
(*.f64 #s(literal -1/2 binary64) a2)
#s(literal -1/2 binary64)
a2
(*.f64 th th)
th
(*.f64 a2 a2)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
a1
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 th)
th

localize204.0ms (2.3%)

Memory
-0.9MiB live, 236.0MiB allocated; 18ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.09765625
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
accuracy0.1484375
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
accuracy0.44140625
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.695265717701468
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
accuracy0.2741012695368841
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy6.191657220043003
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
accuracy6.375774094522699
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
accuracy22.69272203413039
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.22265625
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.695265717701468
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
accuracy26.25259236106045
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
accuracy29.654295502003617
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
accuracy0.08984375
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
accuracy0.3984375
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy22.69272203413039
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
accuracy53.271570389896986
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.0
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
accuracy0.015625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.15234375
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
accuracy0.221035009768442
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
Samples
126.0ms256×0valid
Compiler

Compiled 315 to 52 computations (83.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 103.0ms
ival-mult: 47.0ms (45.6% of total)
ival-add: 35.0ms (33.9% of total)
ival-div: 10.0ms (9.7% of total)
ival-cos: 6.0ms (5.8% of total)
ival-neg: 3.0ms (2.9% of total)
ival-sqrt: 2.0ms (1.9% of total)
exact: 1.0ms (1% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series70.0ms (0.8%)

Memory
16.3MiB live, 166.7MiB allocated; 27ms collecting garbage
Counts
22 → 57
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
Outputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(/ a1 (sqrt 2))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(/ (pow a2 2) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
a1
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ a2 (sqrt 2))
(+ a1 (/ (pow a2 2) a1))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 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)))))
(+ (* 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))))))))
(+ (* 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))))))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(* 1/2 (sqrt 2))
(+ (* -1/4 (* (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))
(+ (* 1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/48 (* (pow th 2) (sqrt 2))))))
(+ (* 1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (sqrt 2))) (* 1/48 (sqrt 2)))))))
(+ (* (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))))
(+ (* (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))))
(+ (* (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))))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (sqrt 2)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
Calls

9 calls:

TimeVariablePointExpression
26.0ms
a1
@-inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (* 1/2 (sqrt 2)) (cos th)) (+ (* a1 a1) (* a2 a2))) (* (* 1/2 (sqrt 2)) (cos th)) (* 1/2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (/ a2 (sqrt 2)) a2) (cos th)) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1))
17.0ms
a2
@0
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (* 1/2 (sqrt 2)) (cos th)) (+ (* a1 a1) (* a2 a2))) (* (* 1/2 (sqrt 2)) (cos th)) (* 1/2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (/ a2 (sqrt 2)) a2) (cos th)) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1))
5.0ms
a2
@-inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (* 1/2 (sqrt 2)) (cos th)) (+ (* a1 a1) (* a2 a2))) (* (* 1/2 (sqrt 2)) (cos th)) (* 1/2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (/ a2 (sqrt 2)) a2) (cos th)) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1))
5.0ms
a2
@inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (* 1/2 (sqrt 2)) (cos th)) (+ (* a1 a1) (* a2 a2))) (* (* 1/2 (sqrt 2)) (cos th)) (* 1/2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (/ a2 (sqrt 2)) a2) (cos th)) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1))
4.0ms
th
@inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (* 1/2 (sqrt 2)) (cos th)) (+ (* a1 a1) (* a2 a2))) (* (* 1/2 (sqrt 2)) (cos th)) (* 1/2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* a2 a2) (* a1 a1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (/ a2 (sqrt 2)) a2) (cos th)) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1))

simplify148.0ms (1.7%)

Memory
-1.7MiB live, 231.4MiB allocated; 22ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01941068
1756957
23667941
08244867
Stop Event
iter limit
node limit
Counts
57 → 56
Calls
Call 1
Inputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(/ a1 (sqrt 2))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(/ (pow a2 2) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
a1
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ a2 (sqrt 2))
(+ a1 (/ (pow a2 2) a1))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 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)))))
(+ (* 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))))))))
(+ (* 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))))))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(* 1/2 (sqrt 2))
(+ (* -1/4 (* (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))
(+ (* 1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/48 (* (pow th 2) (sqrt 2))))))
(+ (* 1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (sqrt 2))) (* 1/48 (sqrt 2)))))))
(+ (* (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))))
(+ (* (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))))
(+ (* (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))))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* 1/2 (* (cos th) (sqrt 2)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
Outputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/ (pow a2 2) (sqrt 2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) a1)
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.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))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) a1 a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (fma.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) a1 a1) a1)
a1
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(fma.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) a1 a1)
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(*.f64 (neg.f64 a1) (-.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(+ a1 (/ (pow a2 2) a1))
(fma.f64 a2 (/.f64 a2 a1) a1)
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.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))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (+.f64 (/.f64 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) a1)) (*.f64 a2 a2))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 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)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 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))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th)))
(+ (* 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))))))))))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 #s(literal 1/48 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th)))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/1440 binary64) (*.f64 th th) #s(literal 1/48 binary64)))))
(* 1/2 (sqrt 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (pow th 2) (sqrt 2))) (* 1/2 (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))
(+ (* 1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/48 (* (pow th 2) (sqrt 2))))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* 1/2 (sqrt 2)) (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (sqrt 2))) (* 1/48 (sqrt 2)))))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/1440 binary64) (*.f64 th th) #s(literal 1/48 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))))
(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))))
(+ (* (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))))
(fma.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.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))))
(+ (* (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))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.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))))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+ (* (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)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2 (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) (*.f64 a2 a2)) (*.f64 th th))) (sqrt.f64 #s(literal 2 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)))
(fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/720 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1/24 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (cos th) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) a2 (*.f64 (/.f64 a2 th) (/.f64 a2 th))) (*.f64 th th))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th)
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) a2 (*.f64 (/.f64 a2 th) (/.f64 a2 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))

rewrite180.0ms (2%)

Memory
19.1MiB live, 257.6MiB allocated; 28ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
061388
091349
1301346
22271333
010004329
Stop Event
iter limit
node limit
iter limit
Counts
22 → 370
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (neg.f64 a1) (neg.f64 a2))) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a1) (neg.f64 a2))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (neg.f64 a1) a2)) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a1) a2)))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 a1 (neg.f64 a2))) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 (neg.f64 a2))))
(*.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 a1 a2)) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 a2 a1)) (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a1) (neg.f64 a2))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (neg.f64 a1) (neg.f64 a2))))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a1) a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (neg.f64 a1) a2)))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 (neg.f64 a2))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 (neg.f64 a2))))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (neg.f64 a2) a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 (neg.f64 a1))) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (-.f64 a2 a1)))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (cos.f64 th) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (cos.f64 th) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (*.f64 a1 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (*.f64 a2 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (cos.f64 th))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (cos.f64 th)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64))) (pow.f64 a2 #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) a2)) a2 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) a2)) a2 (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2) (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (neg.f64 th)) (neg.f64 th) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (neg.f64 th)) (neg.f64 th) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 th th) a2) (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 (*.f64 th th) a2) (*.f64 #s(literal -1/2 binary64) a2) (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) th (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) th (*.f64 a2 a2))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (*.f64 a2 a2))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2))
(fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (*.f64 th th) a2) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (*.f64 th th) a2) (*.f64 a2 a2))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 a2 (*.f64 (*.f64 th th) a2)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 a2 (*.f64 (*.f64 th th) a2)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
(fma.f64 th (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 th (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) (*.f64 a2 a2))
(fma.f64 a2 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 th th)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 a2 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 th th)) (*.f64 a2 a2))
(fma.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) a2)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) a2)) (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))))
(-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th)) th))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (*.f64 th th)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) a2)) (*.f64 (*.f64 th th) a2)))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)))) (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64)))) (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (neg.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (neg.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (neg.f64 th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (*.f64 th th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 th th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (*.f64 (*.f64 th th) a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 th (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 th (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 th th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 th th) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)) (*.f64 (neg.f64 a2) a2))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th)) th) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) a2)) (*.f64 (*.f64 th th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) (/.f64 (*.f64 a1 a1) (-.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 a2 a1) #s(literal 1 binary64))) (/.f64 (*.f64 a1 a1) (-.f64 (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 a1 a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 a1 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2)
(*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (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 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 (neg.f64 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (neg.f64 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 (neg.f64 a1) (neg.f64 a2))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (neg.f64 a1) (neg.f64 a2))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 (neg.f64 a1) a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 (neg.f64 a1) a2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 (neg.f64 a2))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 a1 (neg.f64 a2))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 (neg.f64 a2) (neg.f64 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (neg.f64 a2) (neg.f64 a1))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 (neg.f64 a2) a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 (neg.f64 a2) a1)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a2 (neg.f64 a1))) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 (neg.f64 a1))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (-.f64 a2 a1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))) (neg.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))))))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64)))))
(+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) (/.f64 a1 (-.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 a2 a1) #s(literal 1 binary64))) (/.f64 a1 (-.f64 (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (/.f64 a1 (+.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))) (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 (neg.f64 a2) a1) #s(literal 1 binary64))))
(*.f64 (/.f64 a1 (+.f64 (/.f64 a2 a1) #s(literal 1 binary64))) (/.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (-.f64 (/.f64 a2 a1) #s(literal 1 binary64))))
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1)
(*.f64 a1 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) a1)) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) a1)) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 a1 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 a1 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)))) (neg.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) a1) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) a1) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(/.f64 (*.f64 a1 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 a1 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) a1 (*.f64 #s(literal 1 binary64) a1))
(fma.f64 #s(literal 1 binary64) a1 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) a1))
(fma.f64 a1 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 a1 #s(literal 1 binary64)))
(fma.f64 a1 #s(literal 1 binary64) (*.f64 a1 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) a1) (*.f64 #s(literal 1 binary64) a1))
(+.f64 (*.f64 #s(literal 1 binary64) a1) (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) a1))
(+.f64 (*.f64 a1 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 a1 #s(literal 1 binary64)))
(+.f64 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a1 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))

eval52.0ms (0.6%)

Memory
-31.9MiB live, 103.1MiB allocated; 15ms collecting garbage
Compiler

Compiled 21 018 to 1 841 computations (91.2% saved)

prune52.0ms (0.6%)

Memory
25.1MiB live, 82.2MiB allocated; 38ms collecting garbage
Pruning

30 alts after pruning (25 fresh and 5 done)

PrunedKeptTotal
New41311424
Fresh81422
Picked055
Done000
Total42130451
Accuracy
100.0%
Counts
451 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.5%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
98.6%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
64.5%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
59.4%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
64.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
64.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
64.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
55.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
60.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
15.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
41.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
98.5%
#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))) (*.f64 a2 a2)))
98.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
98.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
58.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
58.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
41.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
64.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
63.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
15.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
23.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
48.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
25.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
18.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
58.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
18.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
Compiler

Compiled 2 270 to 1 345 computations (40.7% saved)

simplify197.0ms (2.2%)

Memory
22.4MiB live, 245.3MiB allocated; 49ms collecting garbage
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff11
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
cost-diff0
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
cost-diff0
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
cost-diff0
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th))
cost-diff0
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
cost-diff0
(fma.f64 a1 a1 (*.f64 a2 a2))
cost-diff0
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
cost-diff0
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
cost-diff0
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
080694
0117661
1280626
2995603
35232603
08199595
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(cos.f64 th)
th
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th)
(*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))
#s(literal -1/2 binary64)
(*.f64 a2 a2)
a2
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64))
(/.f64 a1 a2)
a1
a2
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1))
#s(literal -1/2 binary64)
(*.f64 (*.f64 (*.f64 th th) a1) a1)
(*.f64 (*.f64 th th) a1)
(*.f64 th th)
th
a1
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
#s(literal 1 binary64)
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(cos.f64 th)
th
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th a2) #s(literal -1/2 binary64)) th) a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th a2) #s(literal -1/2 binary64)) th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th a2) #s(literal -1/2 binary64)) th) a2)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th))
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th a2) #s(literal -1/2 binary64)) th) a2))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)
(*.f64 (*.f64 (*.f64 (*.f64 th a2) #s(literal -1/2 binary64)) th) a2)
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th)
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th)
(*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))
(*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)
#s(literal -1/2 binary64)
(*.f64 a2 a2)
a2
th
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64))
(/.f64 a1 a2)
a1
a2
#s(literal 1 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) (fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 a1 th) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) (fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 a1 th) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) (fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 a1 th) a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) (fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 a1 th) a1))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1))
(*.f64 (*.f64 (*.f64 (*.f64 th th) a1) a1) #s(literal -1/2 binary64))
#s(literal -1/2 binary64)
(*.f64 (*.f64 (*.f64 th th) a1) a1)
(*.f64 (*.f64 th th) a1)
(*.f64 th th)
th
a1
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 a2 a1)
a2
#s(literal 1 binary64)
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize173.0ms (1.9%)

Memory
-23.4MiB live, 362.7MiB allocated; 51ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy6.375774094522699
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
accuracy8.036145165586031
(*.f64 (*.f64 th th) a1)
accuracy26.252592361059516
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
accuracy31.45978054119305
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
accuracy0.0
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
accuracy0.162441259768442
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
accuracy0.98046875
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
accuracy22.69272203413039
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
accuracy3.142144088342108
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)
accuracy7.057890047993632
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th)
accuracy26.25259236106045
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64))))
accuracy27.39864166998223
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th))
accuracy0.1484375
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
accuracy0.44140625
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.6956777396049882
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
accuracy22.69272203413039
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
accuracy0.0
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
accuracy0.015625
(fma.f64 a1 a1 (*.f64 a2 a2))
accuracy0.07421875
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
accuracy0.171875
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
Samples
129.0ms256×0valid
Compiler

Compiled 458 to 67 computations (85.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 99.0ms
ival-mult: 47.0ms (47.5% of total)
ival-div: 19.0ms (19.2% of total)
ival-cos: 18.0ms (18.2% of total)
ival-add: 8.0ms (8.1% of total)
ival-neg: 3.0ms (3% of total)
ival-sqrt: 2.0ms (2% of total)
exact: 1.0ms (1% of total)
adjust: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series51.0ms (0.6%)

Memory
-0.9MiB live, 92.3MiB allocated; 7ms collecting garbage
Counts
24 → 83
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th)
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)
(*.f64 (*.f64 th th) a1)
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
Outputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ 1 (sqrt 2))
(+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (+ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (pow a2 2)))
(/ (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(* a1 (pow th 2))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (* (pow a2 2) (sqrt 2)))
(* (pow a1 2) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2)))))
(* (pow a1 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a1 2) (+ 1 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (+ (* -1/2 (pow th 2)) (/ (pow a2 2) (pow a1 2))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(/ a2 (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow a2 2))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (+ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (pow a1 2)))
(/ (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(* -1/2 (* (pow a2 2) th))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ 1 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (+ (* -1/2 (pow th 2)) (/ (pow a1 2) (pow a2 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 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)))))
(+ (* 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))))))))
(+ (* 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))))))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (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))))
(+ (* (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))))
(+ (* (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))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
(* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (pow th 2))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (sqrt 2)))))
Calls

9 calls:

TimeVariablePointExpression
7.0ms
a1
@-inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (+ (* a1 a1) (* a2 a2)) (cos th)) (* (sqrt 2) 1/2)) (* (+ (* a1 a1) (* a2 a2)) (cos th)) (+ (* a1 a1) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (* a2 a2)) (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/ (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (sqrt 2)) (* (* -1/2 (* a2 a2)) th) (* (* (* -1/2 (* a2 a2)) th) th) (* (* th th) a1) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1))
6.0ms
th
@inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (+ (* a1 a1) (* a2 a2)) (cos th)) (* (sqrt 2) 1/2)) (* (+ (* a1 a1) (* a2 a2)) (cos th)) (+ (* a1 a1) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (* a2 a2)) (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/ (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (sqrt 2)) (* (* -1/2 (* a2 a2)) th) (* (* (* -1/2 (* a2 a2)) th) th) (* (* th th) a1) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1))
6.0ms
a2
@inf
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (+ (* a1 a1) (* a2 a2)) (cos th)) (* (sqrt 2) 1/2)) (* (+ (* a1 a1) (* a2 a2)) (cos th)) (+ (* a1 a1) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (* a2 a2)) (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/ (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (sqrt 2)) (* (* -1/2 (* a2 a2)) th) (* (* (* -1/2 (* a2 a2)) th) th) (* (* th th) a1) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1))
5.0ms
a2
@0
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (+ (* a1 a1) (* a2 a2)) (cos th)) (* (sqrt 2) 1/2)) (* (+ (* a1 a1) (* a2 a2)) (cos th)) (+ (* a1 a1) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (* a2 a2)) (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/ (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (sqrt 2)) (* (* -1/2 (* a2 a2)) th) (* (* (* -1/2 (* a2 a2)) th) th) (* (* th th) a1) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1))
5.0ms
a1
@0
((/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (* (* (+ (* a1 a1) (* a2 a2)) (cos th)) (* (sqrt 2) 1/2)) (* (+ (* a1 a1) (* a2 a2)) (cos th)) (+ (* a1 a1) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* a2 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (* (cos th) a2) (/ a2 (sqrt 2))) (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (* (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (* a2 a2)) (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/ (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (sqrt 2)) (* (* -1/2 (* a2 a2)) th) (* (* (* -1/2 (* a2 a2)) th) th) (* (* th th) a1) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1))

simplify216.0ms (2.4%)

Memory
13.5MiB live, 263.0MiB allocated; 27ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02701918
110681709
254891666
084181532
Stop Event
iter limit
node limit
Counts
83 → 83
Calls
Call 1
Inputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ 1 (sqrt 2))
(+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (+ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (pow a2 2)))
(/ (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(* a1 (pow th 2))
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (* (pow a2 2) (sqrt 2)))
(* (pow a1 2) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2)))))
(* (pow a1 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a1 2) (+ 1 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (+ (* -1/2 (pow th 2)) (/ (pow a2 2) (pow a1 2))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(/ a2 (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow a2 2))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (+ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (pow a1 2)))
(/ (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(* -1/2 (* (pow a2 2) th))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ 1 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (+ (* -1/2 (pow th 2)) (/ (pow a1 2) (pow a2 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(+ (* 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)))))
(+ (* 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))))))))
(+ (* 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))))))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (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))))
(+ (* (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))))
(+ (* (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))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (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))))) (/ (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))))))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
(* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (pow th 2))))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (sqrt 2)))))
Outputs
(* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ 1 (sqrt 2))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (+ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (pow a2 2)))
(fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2))
(/ (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2)) (sqrt 2))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(* a1 (pow th 2))
(*.f64 (*.f64 th th) a1)
(* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) #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))))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 a1 a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(/ (pow a1 2) (* (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 a1 (*.f64 a2 a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(* (pow a1 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)
(* (pow a1 2) (+ 1 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (pow a1 2))) (+ (* -1/2 (pow th 2)) (/ (pow a2 2) (pow a1 2))))))
(*.f64 (+.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2) (*.f64 a1 a1))) #s(literal 1 binary64)) (*.f64 a1 a1))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(* (pow a1 2) (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (* (pow a1 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
(*.f64 (+.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)
(/ (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))) (pow a2 2))
(/.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2))
(*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)
(+ (* -1/2 (* (pow a1 2) (pow th 2))) (+ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (pow a1 2)))
(fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2))
(/ (+ (* -1/2 (* (pow a1 2) (pow th 2))) (pow a1 2)) (sqrt 2))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (* (pow a2 2) th))
(*.f64 (*.f64 (*.f64 a2 a2) th) #s(literal -1/2 binary64))
(* -1/2 (* (pow a2 2) (pow th 2)))
(*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) a2) a2)
(* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (fma.f64 (/.f64 (*.f64 a1 a1) a2) (/.f64 (cos.f64 th) a2) (cos.f64 th)) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.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))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (pow a2 2))) (+ (* -1/2 (pow th 2)) (/ (pow a1 2) (pow a2 2))))))
(*.f64 (+.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (*.f64 a2 a2))
(* (pow a2 2) (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (* (pow a2 2) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
(*.f64 (+.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))
(* 1/2 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* 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)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 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))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th)))
(+ (* 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))))))))))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 (*.f64 #s(literal 1/48 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))))
(* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* 1/48 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th)))
(+ (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/4 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/1440 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/48 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/1440 binary64) (*.f64 th th) #s(literal 1/48 binary64)))))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 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))))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 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))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+ (* (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)))
(/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a2) a2 (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) (*.f64 a2 a2)) (*.f64 th th))) (sqrt.f64 #s(literal 2 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)))
(fma.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/720 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1/24 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))) (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))))
(fma.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 th th)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
(/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))
(*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(+ (* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 th th)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+ (* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2)))
(+.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 th th)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a1 a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(* 1/2 (+ (* (pow a1 2) (* (cos th) (sqrt 2))) (* (pow a2 2) (* (cos th) (sqrt 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th)
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) a2 (*.f64 (/.f64 a2 th) (/.f64 a2 th))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) a2 (*.f64 (/.f64 a2 th) (/.f64 a2 th))) (*.f64 th th))
(* -1/2 (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
(*.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 th th)))
(* (pow th 2) (+ (* -1/2 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (pow th 2))))
(*.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)) (*.f64 th th))) (*.f64 th th))
(/ (* (pow a1 2) (* (cos th) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2))
(/.f64 (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (/ (* (pow a1 2) (* (pow th 2) (+ 1 (/ (pow a2 2) (pow a1 2))))) (sqrt 2)))
(*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(* (pow th 2) (+ (* -1/2 (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (sqrt 2))) (/ (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2)))) (* (pow th 2) (sqrt 2)))))
(*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 a1 a1) #s(literal -1/2 binary64)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))

rewrite188.0ms (2.1%)

Memory
-11.5MiB live, 220.4MiB allocated; 41ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
080592
0117544
1398505
23134478
09259470
Stop Event
iter limit
node limit
iter limit
Counts
24 → 310
Calls
Call 1
Inputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(fma.f64 a1 a1 (*.f64 a2 a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th)
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)
(*.f64 (*.f64 th th) a1)
(*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))))
(*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (cos.f64 th)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (cos.f64 th)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (neg.f64 a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 a1 (cos.f64 th)) 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 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 a1 (cos.f64 th)) a1 (*.f64 (*.f64 (cos.f64 th) a2) a2))
(fma.f64 a1 (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(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 a1 (cos.f64 th)) a1))
(fma.f64 a2 (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2))
(/.f64 (fma.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))
(/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 a1) (neg.f64 a1) (*.f64 a2 a2))
(fma.f64 a1 a1 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 a2) (neg.f64 a2) (*.f64 a1 a1))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a1 a2) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) a2) a2)
(*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (*.f64 (/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 a2) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 a1 a2) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (/.f64 a1 a2) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (/.f64 a1 a2) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (-.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 6 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -3/2 binary64))) (+.f64 (pow.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 a1 a2) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.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)) (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a1) a2) (/.f64 (/.f64 (neg.f64 a1) a2) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (/.f64 a1 a2) (/.f64 (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(+.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (pow.f64 (/.f64 a1 a2) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1)))
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 3 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (fma.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal -1/8 binary64) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (fma.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal -1/8 binary64) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)))) (*.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal -1/8 binary64) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (fma.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal -1/8 binary64) (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 3 binary64))))) (*.f64 (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 3 binary64))) (fma.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64) (fma.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 a1 a1))))
(/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))))
(/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64))) a1 (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64))) a1 (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (*.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64))) a1 (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64))) a1 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (/.f64 (neg.f64 a2) a1)) (/.f64 (neg.f64 a2) a1) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (/.f64 (neg.f64 a2) a1)) (/.f64 (neg.f64 a2) a1) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (/.f64 a2 a1)) (/.f64 a2 a1) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (/.f64 a2 a1)) (/.f64 a2 a1) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) #s(literal -1/2 binary64) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64)) (*.f64 a1 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64)) (*.f64 a1 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1)) (neg.f64 a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) a1) (*.f64 (/.f64 (neg.f64 a2) a1) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (/.f64 (neg.f64 a2) a1) (*.f64 (/.f64 (neg.f64 a2) a1) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(fma.f64 (/.f64 a2 a1) (*.f64 (/.f64 a2 a1) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (/.f64 a2 a1) (*.f64 (/.f64 a2 a1) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (*.f64 a1 th) (/.f64 a2 a1)) #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (*.f64 a1 th) (/.f64 a2 a1)) #s(literal 2 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(fma.f64 (*.f64 a1 a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(fma.f64 a1 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 a1 a1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 a1 a1)))))
(-.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1)))
(-.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
(-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (neg.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64))))
(-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(+.f64 (/.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))))
(+.f64 (*.f64 (pow.f64 (*.f64 (/.f64 a2 a1) (*.f64 a1 th)) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))
(+.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1))) a1))
(+.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))
(+.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (-.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1) (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (pow.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64)) (/.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 a1 th) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (pow.f64 (*.f64 a1 th) #s(literal 2 binary64)) #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) a2)) a2)
(*.f64 (*.f64 th a2) (*.f64 #s(literal -1/2 binary64) a2))
(*.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 a2 a2))
(*.f64 (*.f64 (*.f64 a2 a2) th) #s(literal -1/2 binary64))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th)
(*.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 a2 th))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 a2 a2) th))
(*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) th))
(*.f64 th (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2))
(*.f64 a2 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) th))
(*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) a2)) a2)
(*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(*.f64 (pow.f64 (*.f64 th a2) #s(literal 2 binary64)) #s(literal -1/2 binary64))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) th))
(*.f64 (*.f64 (*.f64 th th) a2) (*.f64 #s(literal -1/2 binary64) a2))
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)))
(*.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th) th)
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th))
(*.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (*.f64 th th) a2))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 a2 a2) th) th))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 a2 th) #s(literal 2 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 a2 (*.f64 (*.f64 th th) a2)))
(*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(*.f64 th (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) th))
(*.f64 a2 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 th th)))
(*.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) a2)))
(*.f64 (*.f64 a1 (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 a1 th) th)
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) a1))
(*.f64 (*.f64 th th) a1)
(*.f64 a1 (*.f64 th th))
(*.f64 th (*.f64 a1 th))
(fabs.f64 (*.f64 (*.f64 th th) (neg.f64 a1)))
(fabs.f64 (*.f64 (*.f64 th th) a1))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1) a1)
(*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 a1 a1) (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 a1 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)) a1))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 a1 a1)) (-.f64 (+.f64 (pow.f64 (/.f64 a2 a1) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))))

eval50.0ms (0.6%)

Memory
15.3MiB live, 104.6MiB allocated; 14ms collecting garbage
Compiler

Compiled 25 632 to 2 008 computations (92.2% saved)

prune54.0ms (0.6%)

Memory
-6.0MiB live, 98.9MiB allocated; 13ms collecting garbage
Pruning

29 alts after pruning (23 fresh and 6 done)

PrunedKeptTotal
New3789387
Fresh61420
Picked235
Done235
Total38829417
Accuracy
100.0%
Counts
417 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.5%
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
59.2%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
98.6%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
99.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
98.7%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
64.5%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
98.6%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
59.4%
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
64.3%
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
64.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
64.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
55.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
60.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
63.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
15.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
98.5%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
58.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
41.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
41.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
63.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
30.4%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
63.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
15.9%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
18.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
16.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
18.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
18.6%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
Compiler

Compiled 3 631 to 1 085 computations (70.1% saved)

regimes197.0ms (2.2%)

Memory
-27.9MiB live, 257.9MiB allocated; 50ms collecting garbage
Counts
62 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
#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))) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (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) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 2 binary64))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
Outputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
Calls

8 calls:

49.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)))
38.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
21.0ms
a2
20.0ms
(*.f64 a1 a1)
19.0ms
th
Results
AccuracySegmentsBranch
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%1a1
99.7%1a2
99.7%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes160.0ms (1.8%)

Memory
15.3MiB live, 208.5MiB allocated; 14ms collecting garbage
Counts
60 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
#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))) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (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) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 2 binary64))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
Calls

8 calls:

41.0ms
(cos.f64 th)
25.0ms
(*.f64 a2 a2)
19.0ms
a2
16.0ms
th
16.0ms
a1
Results
AccuracySegmentsBranch
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%1a1
99.7%1a2
99.7%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes102.0ms (1.1%)

Memory
12.2MiB live, 198.1MiB allocated; 17ms collecting garbage
Counts
46 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
#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))) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (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) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
Calls

8 calls:

16.0ms
a2
13.0ms
(cos.f64 th)
13.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)))
13.0ms
(*.f64 a2 a2)
12.0ms
a1
Results
AccuracySegmentsBranch
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%1a1
99.7%1a2
99.7%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes109.0ms (1.2%)

Memory
6.3MiB live, 155.3MiB allocated; 11ms collecting garbage
Counts
45 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
#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))) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (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) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
Calls

8 calls:

25.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)))
15.0ms
th
11.0ms
a1
11.0ms
a2
11.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
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%1a1
99.7%1a2
99.7%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes129.0ms (1.4%)

Memory
10.2MiB live, 153.8MiB allocated; 21ms collecting garbage
Counts
44 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
#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))) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (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) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
Calls

8 calls:

43.0ms
(cos.f64 th)
18.0ms
a1
14.0ms
th
11.0ms
a2
10.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
98.7%1(*.f64 a2 a2)
98.7%1(*.f64 a1 a1)
98.7%1(cos.f64 th)
98.7%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
98.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)))
98.7%1a1
98.7%1a2
98.7%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes94.0ms (1%)

Memory
-21.2MiB live, 169.6MiB allocated; 14ms collecting garbage
Counts
43 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2))
#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))) (*.f64 a2 a2)))
(/.f64 #s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
Calls

8 calls:

14.0ms
th
14.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)))
12.0ms
a1
11.0ms
(*.f64 a2 a2)
11.0ms
a2
Results
AccuracySegmentsBranch
98.7%1(*.f64 a2 a2)
98.7%1(cos.f64 th)
98.7%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
98.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)))
98.7%1a2
98.7%1th
98.7%1(*.f64 a1 a1)
98.7%1a1
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes78.0ms (0.9%)

Memory
16.9MiB live, 163.0MiB allocated; 9ms collecting garbage
Counts
36 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
Calls

8 calls:

11.0ms
a2
11.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)))
11.0ms
(cos.f64 th)
9.0ms
a1
9.0ms
th
Results
AccuracySegmentsBranch
98.6%1(*.f64 a2 a2)
98.6%1(*.f64 a1 a1)
98.6%1(cos.f64 th)
98.6%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
98.6%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
98.6%1a1
98.6%1a2
98.6%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes210.0ms (2.4%)

Memory
-12.7MiB live, 123.4MiB allocated; 13ms collecting garbage
Counts
34 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #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))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) a2) (/.f64 (*.f64 (*.f64 th th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (* 1/2 (sqrt 2)) (cos th)) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (*.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 (*.f64 #s(literal 1/24 binary64) a2) a2) (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 #s(literal 1/24 binary64) th) th #s(literal -1/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))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 th th) a1) a1)) (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64)))
Calls

8 calls:

85.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)))
56.0ms
th
25.0ms
(*.f64 a1 a1)
9.0ms
a2
9.0ms
a1
Results
AccuracySegmentsBranch
64.5%1(*.f64 a2 a2)
64.5%1(*.f64 a1 a1)
75.8%2(cos.f64 th)
75.8%2(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
76.3%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
64.5%1a1
64.5%1a2
66.1%2th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes7.0ms (0.1%)

Memory
9.5MiB live, 9.5MiB allocated; 0ms collecting garbage
Counts
20 → 2
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) th) th))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) th) th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 #s(approx (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) (* (* (cos th) a1) (/ a1 (sqrt 2)))) (/.f64 #s(approx (+ (* (* -1/2 (* (* (* th th) a1) a1)) (+ (* (/ a2 a1) (/ a2 a1)) 1)) (* (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) a1)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 th th) #s(literal 1/2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 #s(approx (* (+ (* (/ a2 a1) (/ a2 a1)) 1) a1) (fma.f64 a2 (/.f64 a2 a1) a1)) a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) a2) (*.f64 th th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
Calls

1 calls:

5.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
AccuracySegmentsBranch
76.3%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 19 to 12 computations (36.8% saved)

regimes49.0ms (0.5%)

Memory
8.7MiB live, 56.1MiB allocated; 10ms collecting garbage
Counts
9 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#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 (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

28.0ms
(cos.f64 th)
3.0ms
a2
3.0ms
th
3.0ms
a1
3.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
64.5%1(*.f64 a2 a2)
64.5%1(*.f64 a1 a1)
64.5%1a2
64.5%1a1
64.5%1th
64.5%1(cos.f64 th)
64.5%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
64.5%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)))
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes23.0ms (0.3%)

Memory
5.3MiB live, 48.1MiB allocated; 9ms collecting garbage
Counts
6 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
Outputs
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
Calls

8 calls:

7.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
2.0ms
th
2.0ms
a1
2.0ms
a2
2.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
64.5%1th
64.5%1(*.f64 a2 a2)
64.5%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)))
64.5%1a2
64.5%1(*.f64 a1 a1)
64.5%1(cos.f64 th)
64.5%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
64.5%1a1
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes18.0ms (0.2%)

Memory
-8.2MiB live, 37.0MiB allocated; 4ms collecting garbage
Counts
5 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 #s(approx (/ (+ (* (/ a1 a2) (/ a1 a2)) 1) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

4.0ms
(cos.f64 th)
2.0ms
a2
2.0ms
th
2.0ms
a1
2.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
63.8%1th
63.8%1(*.f64 a2 a2)
63.8%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)))
63.8%1a2
63.8%1(*.f64 a1 a1)
63.8%1(cos.f64 th)
63.8%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
63.8%1a1
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes16.0ms (0.2%)

Memory
-2.7MiB live, 38.1MiB allocated; 6ms collecting garbage
Counts
3 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
Calls

8 calls:

5.0ms
(*.f64 a1 a1)
2.0ms
th
2.0ms
a1
2.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
1.0ms
a2
Results
AccuracySegmentsBranch
63.7%1(*.f64 a2 a2)
63.7%1a2
63.7%1th
63.7%1(*.f64 a1 a1)
63.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)))
63.7%1a1
63.7%1(cos.f64 th)
63.7%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes9.0ms (0.1%)

Memory
25.6MiB live, 25.6MiB allocated; 0ms collecting garbage
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
Calls

8 calls:

1.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)))
1.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
1.0ms
a2
1.0ms
th
1.0ms
a1
Results
AccuracySegmentsBranch
15.9%1(*.f64 a2 a2)
15.9%1a2
15.9%1th
15.9%1(*.f64 a1 a1)
15.9%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)))
15.9%1a1
15.9%1(cos.f64 th)
15.9%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Compiler

Compiled 35 to 40 computations (-14.3% saved)

bsearch1.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-1.898980568823534e-73
-1.9494421360451286e-139
Compiler

Compiled 22 to 18 computations (18.2% saved)

bsearch0.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated; 0ms collecting garbage
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
-1.898980568823534e-73
-1.9494421360451286e-139
Compiler

Compiled 22 to 18 computations (18.2% saved)

simplify114.0ms (1.3%)

Memory
-56.6MiB live, 69.1MiB allocated; 30ms collecting garbage
Algorithm
egg-herbie
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0111633
1220609
2604555
32007555
44967555
56936555
Stop Event
node limit
Calls
Call 1
Inputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(if (<=.f64 (+.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))) #s(literal -6365737426045269/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th)))) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))))
(if (<=.f64 (+.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))) #s(literal -6365737426045269/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th)))) #s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
Outputs
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) #s(literal 2 binary64))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 #s(approx (* (+ (* a1 a1) (* a2 a2)) (cos th)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(if (<=.f64 (+.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))) #s(literal -6365737426045269/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th)))) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 2 binary64))))
(if (<=.f64 (+.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))) #s(literal -6365737426045269/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) #s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (* (* (cos th) a2) (/ a2 (sqrt 2))) #s(approx (/ (+ (* (* (* -1/2 a2) a2) (* th th)) (* a2 a2)) (sqrt 2)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) th) th)))) #s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (* a2 (cos th)) (neg a2)) (neg (sqrt 2))) (* (neg (sqrt 2)) (* (* a1 (cos th)) (neg a1)))) 2) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))

derivations1.6s (17.5%)

Memory
28.9MiB live, 1 529.7MiB allocated; 353ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01941068
1756957
23667941
08244867
02701918
110681709
254891666
084181532
0111543
1388508
21688439
35754424
08567387
01244
02038
17238
250538
3707938
0882237
042265
069253
1234244
21698226
08813225
061388
091349
1301346
22271333
010004329
02931825
111701676
257161652
083201518
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 681 to 111 computations (83.7% saved)

preprocess117.0ms (1.3%)

Memory
50.2MiB live, 270.5MiB allocated; 34ms collecting garbage
Remove

(abs a2)

(abs th)

Compiler

Compiled 2 192 to 786 computations (64.1% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...