Migdal et al, Equation (64)

Time bar (total: 7.3s)

start0.0ms (0%)

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

analyze0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated; 0ms collecting garbage
Algorithm
1×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 (17.9%)

Memory
100.6MiB live, 1 868.0MiB allocated; 342ms collecting garbage
Samples
997.0ms8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 726.0ms
ival-cos: 307.0ms (42.3% of total)
ival-mult: 257.0ms (35.4% of total)
ival-sqrt: 63.0ms (8.7% of total)
ival-div: 46.0ms (6.3% of total)
ival-add: 37.0ms (5.1% of total)
ival-true: 6.0ms (0.8% of total)
exact: 5.0ms (0.7% of total)
ival-assert: 3.0ms (0.4% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

explain947.0ms (13.1%)

Memory
-175.4MiB live, 545.1MiB allocated; 1.1s 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
68.0ms512×0valid
Compiler

Compiled 135 to 40 computations (70.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 49.0ms
ival-mult: 21.0ms (42.4% of total)
ival-cos: 19.0ms (38.4% of total)
ival-sqrt: 4.0ms (8.1% of total)
ival-div: 3.0ms (6.1% of total)
ival-add: 2.0ms (4% 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)

preprocess205.0ms (2.8%)

Memory
23.0MiB live, 213.4MiB allocated; 20ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
040120
1163120
2593120
31539120
43028120
54447120
67176120
01219
02013
15213
217413
355113
4111213
5170613
6309013
7718313
0810012
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Outputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
Symmetry

(abs th)

(abs a2)

(abs a1)

(sort a1 a2)

Compiler

Compiled 19 to 12 computations (36.8% saved)

eval0.0ms (0%)

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

Compiled 0 to 3 computations (-∞% saved)

prune0.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.6%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 19 to 12 computations (36.8% saved)

simplify149.0ms (2%)

Memory
-26.7MiB live, 161.5MiB allocated; 18ms collecting garbage
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
217450
355150
4111250
5170650
6309050
7718350
0810049
Stop Event
1×iter limit
1×node limit
1×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

localize35.0ms (0.5%)

Memory
33.0MiB live, 79.6MiB allocated; 3ms collecting garbage
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.0078125
(+.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.2109375
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
accuracy0.213222509768442
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
accuracy0.6982612793053261
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Samples
27.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 (35.9% of total)
ival-cos: 6.0ms (35.9% of total)
ival-div: 2.0ms (12% of total)
ival-sqrt: 2.0ms (12% of total)
ival-add: 1.0ms (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)

series60.0ms (0.8%)

Memory
7.7MiB live, 54.5MiB allocated; 45ms collecting garbage
Counts
5 → 29
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
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Calls

9 calls:

TimeVariablePointExpression
36.0ms
a1
@-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)))
8.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)))
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)))
3.0ms
a1
@0
((+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/ (cos th) (sqrt 2)) (cos th) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
3.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)))

simplify141.0ms (1.9%)

Memory
-7.8MiB live, 227.9MiB allocated; 23ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0145829
1455797
22115728
08200680
Stop Event
1×iter limit
1×node limit
Counts
29 → 29
Calls
Call 1
Inputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Outputs
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.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))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (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))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (/.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))

rewrite47.0ms (0.6%)

Memory
-7.4MiB live, 86.1MiB allocated; 5ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01244
02038
17238
051437
Stop Event
1×iter limit
1×iter limit
1×node limit
1×iter limit
Counts
5 → 80
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 (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))) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (fma.f64 a2 a2 (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a1) a1 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 a1) (/.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 a2) (/.f64 (cos.f64 th) (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 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.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 (*.f64 (cos.f64 th) 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 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2))
(*.f64 (/.f64 (*.f64 (cos.f64 th) 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 (fabs.f64 a2) (*.f64 (fabs.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 (*.f64 (cos.f64 th) 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 (*.f64 a2 a2) (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 (cos.f64 th) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)))

eval17.0ms (0.2%)

Memory
-14.5MiB live, 36.7MiB allocated; 6ms collecting garbage
Compiler

Compiled 3 491 to 387 computations (88.9% saved)

prune10.0ms (0.1%)

Memory
29.3MiB live, 29.3MiB allocated; 0ms collecting garbage
Pruning

13 alts after pruning (13 fresh and 0 done)

PrunedKeptTotal
New11713130
Fresh000
Picked101
Done000
Total11813131
Accuracy
99.9%
Counts
131 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
▶99.7%
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
▶99.6%
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
▶99.7%
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
99.5%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
66.2%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
99.6%
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
▶48.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (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))))
44.1%
#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 #s(literal 1/24 binary64) (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
▶66.2%
#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))))
55.8%
#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 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
57.6%
#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.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
Compiler

Compiled 750 to 460 computations (38.7% saved)

simplify116.0ms (1.6%)

Memory
-9.6MiB live, 177.5MiB allocated; 16ms collecting garbage
Localize:

Found 20 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
042394
069368
1170368
2620344
33112338
08185336
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(cos.f64 th)
th
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 a1)
a1
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (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))) (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))))
(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)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 th th)
th
#s(literal 1 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)
(*.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))
(*.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 (/.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)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(cos.f64 th)
th
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
(*.f64 (cos.f64 th) a2)
(cos.f64 th)
th
a2
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(*.f64 (cos.f64 th) a1)
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
Outputs
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (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))))
(cos.f64 th)
th
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (cos.f64 th)))
(*.f64 a1 a1)
a1
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (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))) (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(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)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (pow.f64 th #s(literal 4 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
#s(literal -1/2 binary64)
(*.f64 th th)
th
#s(literal 1 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)
(*.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))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.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 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.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 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))
#s(literal -1/720 binary64)
#s(literal 1/24 binary64)
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (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 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(cos.f64 th)
th
(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)
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(*.f64 a2 (cos.f64 th))
(cos.f64 th)
th
a2
(*.f64 (*.f64 (cos.f64 th) a1) a1)
(*.f64 (*.f64 a1 (cos.f64 th)) a1)
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (cos.f64 th))
a1
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)

localize125.0ms (1.7%)

Memory
11.0MiB live, 252.1MiB allocated; 19ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.08203125
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
accuracy0.1015625
(*.f64 (cos.f64 th) a2)
accuracy0.140625
(*.f64 (cos.f64 th) a1)
accuracy0.193691259768442
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.0859375
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
accuracy0.193691259768442
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
accuracy2.7516133681735435
(*.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)))
accuracy3.116864207585293
(*.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))
accuracy12.63566571375439
(*.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))
accuracy28.170621731515073
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (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))))
accuracy0.0
(*.f64 a1 a1)
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.23828125
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
accuracy21.562112940836087
#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.1015625
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.213222509768442
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
accuracy0.23046875
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
accuracy0.6982612793053261
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Samples
96.0ms256×0valid
Compiler

Compiled 368 to 42 computations (88.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 72.0ms
ival-mult: 36.0ms (50% of total)
const: 12.0ms (16.7% of total)
ival-add: 8.0ms (11.1% of total)
ival-div: 7.0ms (9.7% of total)
ival-cos: 7.0ms (9.7% of total)
ival-sqrt: 2.0ms (2.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)

series62.0ms (0.9%)

Memory
15.3MiB live, 106.6MiB allocated; 9ms collecting garbage
Counts
23 → 143
Calls
Call 1
Inputs
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(cos.f64 th)
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
(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)))
(*.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))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (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))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) a2)
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(*.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 (/.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 (cos.f64 th) a1)
Outputs
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (cos th) a1) #s(hole binary64 (* a1 (cos th))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (/ (* a2 a2) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (cos th) a2) #s(hole binary64 (* a2 (cos th))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole 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))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole 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))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole 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))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (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)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (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)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* -1/2 (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* 1/24 (pow a1 2)) (* 1/24 (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* 1/24 (pow a1 2)) (+ (* 1/24 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (pow a1 2)) (* -1/720 (pow a2 2)))))))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (cos th) a2) #s(hole binary64 a2))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* -1/2 (* a2 (pow th 2))))))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (cos th) a1) #s(hole binary64 a1))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* -1/2 (* a1 (pow th 2))))))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Calls

9 calls:

TimeVariablePointExpression
9.0ms
a2
@inf
((+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) (cos th) (/ (* a2 a2) (sqrt 2)) (* a2 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) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) (* (cos th) (+ (* a2 a2) (* a1 a1))) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (* (cos th) a2) (/ (cos th) (sqrt 2)) (* (* a1 a1) (/ (cos th) (sqrt 2))) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* (cos th) a1))
9.0ms
a1
@0
((+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) (cos th) (/ (* a2 a2) (sqrt 2)) (* a2 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) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) (* (cos th) (+ (* a2 a2) (* a1 a1))) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (* (cos th) a2) (/ (cos th) (sqrt 2)) (* (* a1 a1) (/ (cos th) (sqrt 2))) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* (cos th) a1))
9.0ms
a2
@0
((+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) (cos th) (/ (* a2 a2) (sqrt 2)) (* a2 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) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) (* (cos th) (+ (* a2 a2) (* a1 a1))) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (* (cos th) a2) (/ (cos th) (sqrt 2)) (* (* a1 a1) (/ (cos th) (sqrt 2))) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* (cos th) a1))
6.0ms
a1
@inf
((+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) (cos th) (/ (* a2 a2) (sqrt 2)) (* a2 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) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) (* (cos th) (+ (* a2 a2) (* a1 a1))) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (* (cos th) a2) (/ (cos th) (sqrt 2)) (* (* a1 a1) (/ (cos th) (sqrt 2))) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* (cos th) a1))
6.0ms
th
@inf
((+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) (cos th) (/ (* a2 a2) (sqrt 2)) (* a2 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) (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* -1/2 (* th th)) 1) (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) (* (cos th) (+ (* a2 a2) (* a1 a1))) (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (* (cos th) a2) (/ (cos th) (sqrt 2)) (* (* a1 a1) (/ (cos th) (sqrt 2))) (sqrt 2) (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* (cos th) a1))

simplify187.0ms (2.6%)

Memory
3.6MiB live, 236.2MiB allocated; 42ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04805576
115324943
085734493
Stop Event
1×iter limit
1×node limit
Counts
143 → 143
Calls
Call 1
Inputs
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (cos th) a1) #s(hole binary64 (* a1 (cos th))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (/ (* a2 a2) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (* (cos th) a2) #s(hole binary64 (* a2 (cos th))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole 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))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole 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))))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole 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))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (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)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (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)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* -1/2 (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* 1/24 (pow a1 2)) (* 1/24 (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* 1/24 (pow a1 2)) (+ (* 1/24 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (pow a1 2)) (* -1/720 (pow a2 2)))))))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (cos th) a2) #s(hole binary64 a2))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* -1/2 (* a2 (pow th 2))))))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (cos th) a1) #s(hole binary64 a1))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* -1/2 (* a1 (pow th 2))))))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
Outputs
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.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))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#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)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* a2 a2) (* a1 a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a2 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) a2)) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) a1) #s(hole binary64 (* a1 (cos th))))
#s(approx (* (cos th) a1) (*.f64 (cos.f64 th) a1))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.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))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#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)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#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 (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a1 a1))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 a2 a1) (/.f64 a2 a1)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a1) a1))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th)) (*.f64 a1 a1)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a1 2) (cos th))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a1) a1))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a1) (/.f64 (*.f64 a2 a2) a1) (cos.f64 th)) (*.f64 a1 a1)))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 th th)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a1 2) (+ (/ (* (pow a2 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a1 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a2 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (*.f64 a1 a1)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (* a2 a2) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (* a2 a2) (sqrt 2)) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (* a2 a2) (*.f64 a2 a2))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
#s(approx (* (cos th) a2) #s(hole binary64 (* a2 (cos th))))
#s(approx (* (cos th) a2) (*.f64 (cos.f64 th) a2))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#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)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 th (/.f64 th (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (/.f64 a1 a2) (/.f64 a1 a2)) (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2)))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 4) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a2) (/.f64 (*.f64 a1 a1) a2) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 (/.f64 (cos.f64 th) a2) (/.f64 (*.f64 a1 a1) a2) (cos.f64 th)) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (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)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow a2 2) (+ (/ (* (pow a1 2) (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2))))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) (sqrt 2))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th))) (*.f64 a2 a2)))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow a2 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (+ (* 1/24 (/ 1 (sqrt 2))) (/ (* (pow a1 2) (+ 1/24 (* -1/720 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 (/.f64 a1 (*.f64 a2 a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #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)))))
#s(approx (+ (* (cos th) (/ (* a2 a2) (sqrt 2))) (* (* a1 a1) (/ (cos th) (sqrt 2)))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #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)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #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)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole 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))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 1))
#s(approx (+ (* -1/2 (* th th)) 1) #s(literal 1 binary64))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (+ (* -1/2 (* th th)) 1) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole 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))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #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)))))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole 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))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (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)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (+ (* (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)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (pow.f64 th #s(literal 4 binary64)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 a1 a1 (*.f64 a2 a2)))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (* -1/2 (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* 1/24 (pow a1 2)) (* 1/24 (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64))) (*.f64 th th) (fma.f64 a1 a1 (*.f64 a2 a2))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (pow a1 2)) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* 1/24 (pow a1 2)) (+ (* 1/24 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (pow a1 2)) (* -1/720 (pow a2 2)))))))))) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64))) (pow.f64 th #s(literal 4 binary64)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #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)))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (cos th) a2) #s(hole binary64 a2))
#s(approx (* (cos th) a2) a2)
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* -1/2 (* a2 (pow th 2))))))
#s(approx (* (cos th) a2) (fma.f64 (*.f64 (*.f64 th th) a2) #s(literal -1/2 binary64) a2))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))))
#s(approx (* (cos th) a2) (fma.f64 (fma.f64 (*.f64 (*.f64 th th) a2) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) a2)) (*.f64 th th) a2))
#s(approx (* (cos th) a2) #s(hole binary64 (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))))
#s(approx (* (cos th) a2) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a2) th) th (fma.f64 (fma.f64 (*.f64 (*.f64 th th) a2) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) a2)) (pow.f64 th #s(literal 4 binary64)) a2)))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ 1 (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (fma.f64 (*.f64 (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th (/.f64 #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)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))))
#s(approx (/ (cos th) (sqrt 2)) (fma.f64 (fma.f64 (/.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 #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)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) (fma.f64 (/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a1 a1)) th) th (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))))
#s(approx (* (* a1 a1) (/ (cos th) (sqrt 2))) (*.f64 (/.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (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)))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) a1) #s(hole binary64 a1))
#s(approx (* (cos th) a1) a1)
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* -1/2 (* a1 (pow th 2))))))
#s(approx (* (cos th) a1) (fma.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/2 binary64) a1))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* 1/24 (* a1 (pow th 2))))))))
#s(approx (* (cos th) a1) (fma.f64 (fma.f64 (*.f64 (*.f64 th th) a1) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) a1)) (*.f64 th th) a1))
#s(approx (* (cos th) a1) #s(hole binary64 (+ a1 (* (pow th 2) (+ (* -1/2 a1) (* (pow th 2) (+ (* -1/720 (* a1 (pow th 2))) (* 1/24 a1))))))))
#s(approx (* (cos th) a1) (fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) a1) th) th (fma.f64 (fma.f64 (*.f64 (*.f64 th th) a1) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) a1)) (pow.f64 th #s(literal 4 binary64)) a1)))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (*.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.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/720 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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/720 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) #s(hole binary64 (* (pow th 6) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 4) (sqrt 2)))) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (/ (pow a1 2) (* (pow th 6) (sqrt 2))) (/ (pow a2 2) (* (pow th 6) (sqrt 2))))))))))
#s(approx (+ (* (+ (* -1/2 (* th th)) 1) (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2))) (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th))) (*.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 4 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (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 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (pow.f64 th #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 6) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.f64 (*.f64 (pow.f64 th #s(literal 6 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) #s(hole binary64 (* (pow th 6) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (* th th)) (*.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/720 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 6 binary64))))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* -1/2 (pow th 2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
#s(approx (+ (* -1/2 (* th th)) 1) #s(hole binary64 (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))))
#s(approx (+ (* -1/2 (* th th)) 1) (*.f64 (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) th) th))
#s(approx (/ (* (cos th) (+ (* a2 a2) (* a1 a1))) (sqrt 2)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (cos th) (+ (* a2 a2) (* a1 a1))) #s(hole binary64 (* (cos th) (+ (pow a1 2) (pow a2 2)))))
#s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) #s(hole binary64 (/ (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th))) (sqrt 2))))
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) #s(hole binary64 (/ (cos th) (sqrt 2))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* -1/720 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) #s(hole binary64 (* (pow th 4) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (* th th)) (*.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/720 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) #s(hole binary64 (* (pow th 2) (+ (* -1/720 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2))))))))
#s(approx (* (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (+ (* -1/720 (* th th)) 1/24)) (*.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/720 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)))

rewrite103.0ms (1.4%)

Memory
-15.2MiB live, 119.9MiB allocated; 15ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
042314
069288
1284276
02345276
Stop Event
1×iter limit
1×iter limit
1×node limit
1×iter limit
Counts
23 → 608
Calls
Call 1
Inputs
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(cos.f64 th)
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
(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)))
(*.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))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (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))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1)))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) a2)
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(*.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 (/.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 (cos.f64 th) a1)
Outputs
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.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 (*.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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (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 a2 a1) #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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 a2 (cos.f64 th)) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (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)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1 (*.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 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (fabs.f64 a1) (*.f64 (fabs.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 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.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 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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 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 (*.f64 a1 (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 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 a2 (*.f64 (/.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 a2 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 a2 (/.f64 (*.f64 a2 (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 (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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (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 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (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 (neg.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th)))
(-.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 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(+.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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.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 (fabs.f64 a2) (/.f64 (fabs.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) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 a2 a2)
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
#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 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #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 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (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))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 a2 a1) #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))))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(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 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.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 a1 (/.f64 a1 (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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 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 (*.f64 (neg.f64 a1) a1) #s(literal 3 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 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #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 a2 a1) #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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(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 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)) (*.f64 a2 a2))
(fma.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)) (*.f64 a1 a1))
(fma.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)) (*.f64 a2 a2))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)) (*.f64 a1 a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) a2 (*.f64 a1 a1))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)) (*.f64 a2 a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) a1 (*.f64 a2 a2))
(fma.f64 (neg.f64 a1) (neg.f64 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 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.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 a2) a2))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(+.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 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) a1)
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 a1 a1)
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))) (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (fabs.f64 th)) (fabs.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) (*.f64 th (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) th)) th (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 th) (*.f64 (fabs.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(fma.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 th (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) th)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) th))) th))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 th #s(literal 4 binary64))))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(-.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(+.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 th th)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 th th)))
(+.f64 (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.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 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (fabs.f64 th)) (fabs.f64 th))
(*.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))
(*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (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))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) (*.f64 th (*.f64 th th)))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) th)) th)
(*.f64 (fabs.f64 th) (*.f64 (fabs.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th)) (*.f64 th th))
(*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 th #s(literal 4 binary64)))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 th #s(literal 4 binary64))))
(*.f64 (*.f64 th th) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (*.f64 th th)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (pow.f64 th #s(literal 4 binary64))))
(*.f64 th (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) th)))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (pow.f64 th #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.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 binary64) (*.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64))) (neg.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (fabs.f64 th)) (fabs.f64 th) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 th)) (neg.f64 th) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 th #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) th #s(literal 1 binary64))
(fma.f64 (fabs.f64 th) (*.f64 (fabs.f64 th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 th) (*.f64 (neg.f64 th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 th (*.f64 #s(literal -1/2 binary64) th) #s(literal 1 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal -1 binary64))))
(-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) th)) th))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 th th)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.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 (*.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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (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 a2 a1) #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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 a2 (cos.f64 th)) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (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)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1 (*.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 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (fabs.f64 a1) (*.f64 (fabs.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 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.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 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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 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 (*.f64 a1 (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 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 a2 (*.f64 (/.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 a2 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 a2 (/.f64 (*.f64 a2 (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 (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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (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 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (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 (neg.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th)))
(-.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 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(+.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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 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 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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) a1) (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (neg.f64 a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 (cos.f64 th) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 (cos.f64 th) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 a1 (cos.f64 th)) a1 (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (*.f64 a2 (cos.f64 th)) a2 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 a2 (cos.f64 th)) a2 (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 a1 (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (neg.f64 a1) (*.f64 a1 (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (*.f64 a2 (cos.f64 th))) a2))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 a2) (*.f64 a2 (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(*.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 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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) a1) (*.f64 a1 (cos.f64 th))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (neg.f64 a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 (cos.f64 th) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 (cos.f64 th) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 (cos.f64 th) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 a1 (cos.f64 th)) a1 (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (*.f64 a2 (cos.f64 th)) a2 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 a2 (cos.f64 th)) a2 (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 a1 (*.f64 a1 (cos.f64 th)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (cos.f64 th)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (neg.f64 a1) (*.f64 a1 (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (*.f64 a2 (cos.f64 th))) a2))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 a2) (*.f64 a2 (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (cos.f64 th))) a1))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.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 (*.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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 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))) (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th))) (neg.f64 (neg.f64 (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 a2 a1) #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 a2 a1) #s(literal 2 binary64))) (pow.f64 a2 #s(literal 4 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 a2 (cos.f64 th)) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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 2 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (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)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1 (*.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 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 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (fabs.f64 a1) (*.f64 (fabs.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 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.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 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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 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 (*.f64 a1 (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 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 a2 (*.f64 (/.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 a2 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 a2 (/.f64 (*.f64 a2 (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 (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 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 (/.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 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 a1 (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 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (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 (neg.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th)))
(-.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 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #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 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #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 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(+.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 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(/.f64 (neg.f64 (neg.f64 (cos.f64 th))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a1 (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 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fabs.f64 th)) (fabs.f64 th))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 th)) (neg.f64 th))
(*.f64 (*.f64 (*.f64 th th) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
(*.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th) (/.f64 (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))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)) th)
(*.f64 (fabs.f64 th) (*.f64 (fabs.f64 th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (neg.f64 th) (*.f64 (neg.f64 th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th th))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th))
(*.f64 th (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th)))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) th) th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 th th) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.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 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(fma.f64 (*.f64 th th) (*.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 th th) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.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 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th th) (*.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 th th) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1/13824 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (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/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)))
(/.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1/13824 binary64))) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))))
(/.f64 (-.f64 (*.f64 (*.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/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.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 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.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/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (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 (*.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 (neg.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1/13824 binary64)) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1/13824 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1/13824 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64))))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) #s(literal -1/576 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) #s(literal 1/24 binary64))))
(/.f64 (*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (fma.f64 #s(literal -1/373248000 binary64) (pow.f64 (*.f64 th th) #s(literal 3 binary64)) #s(literal 1/13824 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/518400 binary64) (pow.f64 th #s(literal 4 binary64)) (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th th) #s(literal -1/17280 binary64))))))
(/.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) th)) th (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/720 binary64)) (*.f64 th th) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal -1/720 binary64) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 #s(literal -1/720 binary64) th) (*.f64 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))))
(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))))
(fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1/720 binary64) (*.f64 (*.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))))
(fma.f64 (*.f64 th th) (*.f64 #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))))
(fma.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/24 binary64) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))))
(-.f64 (*.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 #s(literal -1/24 binary64) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 th th)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/24 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.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 (/.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.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 a1 (cos.f64 th))
(*.f64 (cos.f64 th) a1)

eval110.0ms (1.5%)

Memory
19.9MiB live, 208.6MiB allocated; 30ms collecting garbage
Compiler

Compiled 36 685 to 2 756 computations (92.5% saved)

prune42.0ms (0.6%)

Memory
-12.6MiB live, 86.7MiB allocated; 26ms collecting garbage
Pruning

25 alts after pruning (24 fresh and 1 done)

PrunedKeptTotal
New79522817
Fresh628
Picked415
Done000
Total80525830
Accuracy
100.0%
Counts
830 → 25
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
99.6%
(fma.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
99.6%
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
29.6%
(/.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))))
98.8%
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
56.1%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
62.1%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
57.6%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
98.8%
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
▶99.7%
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
57.6%
#s(approx (/ (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
47.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
▶66.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
▶66.0%
#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))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
✓66.2%
#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))))
▶66.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
40.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
65.3%
#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))))
13.0%
#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))))
55.8%
#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 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
98.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
40.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))))
66.1%
#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))))
65.3%
#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))))))
▶13.0%
#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))))))
Compiler

Compiled 1 511 to 916 computations (39.4% saved)

simplify119.0ms (1.6%)

Memory
11.8MiB live, 152.8MiB allocated; 22ms collecting garbage
Localize:

Found 20 expressions of interest:

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

Useful iterations: 1 (0.0ms)

IterNodesCost
040314
062258
1143255
2450255
31882255
47295255
08525255
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 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 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))) (fma.f64 a1 (/.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))
a1
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
#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))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
(*.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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
a2
(*.f64 a1 a1)
a1
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(asinh.f64 #s(literal 1 binary64))
#s(literal 1 binary64)
Outputs
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 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 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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) 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))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (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)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
#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))) (*.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))) (/.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))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.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)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)
(*.f64 a1 a1)
a1
(*.f64 (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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
a2
(*.f64 a1 a1)
a1
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(asinh.f64 #s(literal 1 binary64))
#s(literal 1 binary64)

localize94.0ms (1.3%)

Memory
-6.5MiB live, 182.0MiB allocated; 21ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.0
(asinh.f64 #s(literal 1 binary64))
accuracy0.23828125
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
accuracy1.0
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
accuracy21.562112940836087
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
accuracy0.20703125
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
accuracy0.24285126953688405
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
accuracy1.0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
accuracy21.562112940836087
#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))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.14453125
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
accuracy0.41015625
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.41796875
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy21.562112940836087
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
accuracy0.13671875
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
accuracy0.41015625
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
accuracy21.562112940836087
#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))))))
accuracy54.715343486335726
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.09765625
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
accuracy0.23828125
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
Samples
70.0ms256×0valid
Compiler

Compiled 258 to 33 computations (87.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 52.0ms
ival-mult: 14.0ms (27.2% of total)
ival-div: 10.0ms (19.4% of total)
ival-add: 10.0ms (19.4% of total)
ival-cos: 9.0ms (17.5% of total)
ival-cosh: 4.0ms (7.8% of total)
ival-asinh: 3.0ms (5.8% of total)
ival-sqrt: 2.0ms (3.9% 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)

series59.0ms (0.8%)

Memory
3.7MiB live, 144.0MiB allocated; 8ms collecting garbage
Counts
25 → 71
Calls
Call 1
Inputs
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.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 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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(sqrt.f64 #s(literal 2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 (fma.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)) (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))) (*.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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
(cos.f64 th)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(asinh.f64 #s(literal 1 binary64))
Outputs
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* a1 (/ a1 (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* 2 (/ (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (+ (* 2 (/ (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2))))))) (* 2 (/ (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2))))))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* 2 (/ (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* (pow a1 2) (+ (* 2 (/ (pow a2 2) (* (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))) (* 2 (/ 1 (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (* (/ a2 (sqrt 2)) a2) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* (pow a2 2) (+ (* 2 (/ (pow a1 2) (* (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))) (* 2 (/ 1 (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Calls

9 calls:

TimeVariablePointExpression
20.0ms
a1
@0
((* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* (/ (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)) (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (sqrt 2) (* (sqrt 2) (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (* (sqrt 2) (* a1 a1)) (cosh (asinh 1)) (asinh 1))
7.0ms
a1
@-inf
((* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* (/ (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)) (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (sqrt 2) (* (sqrt 2) (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (* (sqrt 2) (* a1 a1)) (cosh (asinh 1)) (asinh 1))
7.0ms
a2
@-inf
((* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* (/ (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)) (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (sqrt 2) (* (sqrt 2) (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (* (sqrt 2) (* a1 a1)) (cosh (asinh 1)) (asinh 1))
7.0ms
a1
@inf
((* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* (/ (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)) (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (sqrt 2) (* (sqrt 2) (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (* (sqrt 2) (* a1 a1)) (cosh (asinh 1)) (asinh 1))
6.0ms
a2
@inf
((* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (+ (* a1 a1) (* a2 a2)) (* a2 a2) (+ (* (/ (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)) (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (sqrt 2) (* (sqrt 2) (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (+ (* a2 a2) (* a1 a1)) (* a1 a1) (cos th) (/ a2 (sqrt 2)) (* (/ a2 (sqrt 2)) a2) (* (sqrt 2) (* a1 a1)) (cosh (asinh 1)) (asinh 1))

simplify216.0ms (3%)

Memory
-8.9MiB live, 329.9MiB allocated; 122ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02221789
16801695
233531689
082071565
Stop Event
1×iter limit
1×node limit
Counts
71 → 71
Calls
Call 1
Inputs
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* a1 (/ a1 (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* 2 (/ (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (+ (* 2 (/ (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2))))))) (* 2 (/ (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2))))))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* 2 (/ (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* (pow a1 2) (+ (* 2 (/ (pow a2 2) (* (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))) (* 2 (/ 1 (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (* (/ a2 (sqrt 2)) a2) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* (pow a2 2) (+ (* 2 (/ (pow a1 2) (* (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))) (* 2 (/ 1 (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Outputs
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* a1 a1) (* a2 a2)) (fma.f64 a2 a2 (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* a1 (/ a1 (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (* a1 (/ a1 (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ a1 (sqrt 2)) #s(hole binary64 (/ a1 (sqrt 2))))
#s(approx (/ a1 (sqrt 2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* 2 (/ (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (/.f64 (*.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (+ (* 2 (/ (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2))))))) (* 2 (/ (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2))))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a2 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (+ (pow a1 2) (pow a2 2))))
#s(approx (+ (* a1 a1) (* a2 a2)) (fma.f64 a2 a2 (*.f64 a1 a1)))
#s(approx (* a1 a1) #s(hole binary64 (pow a1 2)))
#s(approx (* a1 a1) (*.f64 a1 a1))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (sqrt 2) (* a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1))
#s(approx (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 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)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* 2 (/ (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (/.f64 (*.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* (pow a1 2) (+ (* 2 (/ (pow a2 2) (* (pow a1 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))) (* 2 (/ 1 (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (/.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (pow a1 2)))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a1 a1))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1)))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (* a2 a2) (*.f64 a2 a2))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (/ a2 (sqrt 2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ a2 (sqrt 2)) a2) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ a2 (sqrt 2)) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (+ (* a1 a1) (* a2 a2)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (+ (* a1 (/ a1 (sqrt 2))) (* (/ a2 (sqrt 2)) a2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 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)))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) #s(hole binary64 (* (pow a2 2) (+ (* 2 (/ (pow a1 2) (* (pow a2 2) (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))) (* 2 (/ 1 (+ 1 (+ (sqrt 2) (/ 1 (+ 1 (sqrt 2)))))))))))
#s(approx (/ (+ (* a2 a2) (* a1 a1)) (cosh (asinh 1))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (/.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* a2 a2) (* a1 a1)) #s(hole binary64 (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))))
#s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (*.f64 a2 a2)))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (+.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos 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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (fma.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (+.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (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)))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))

rewrite94.0ms (1.3%)

Memory
11.5MiB live, 201.7MiB allocated; 16ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
040283
062224
1220221
01819221
Stop Event
1×iter limit
1×iter limit
1×node limit
1×iter limit
Counts
25 → 641
Calls
Call 1
Inputs
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(*.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 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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(sqrt.f64 #s(literal 2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 (fma.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)) (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))) (*.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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(*.f64 a1 a1)
(cos.f64 th)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(asinh.f64 #s(literal 1 binary64))
Outputs
(*.f64 (/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #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 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (cos.f64 th)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (sqrt.f64 #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 (cos.f64 th) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)))) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 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 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #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 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 a2 a1) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a1) a1 (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (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 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64)))))
(/.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 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 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 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #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 (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 a2 a1) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a2) a2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (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 a1) (/.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(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 (/.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 (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)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))) (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)))))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.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 a2 a2)) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.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 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (+.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) a1) a1) (*.f64 (*.f64 (cos.f64 th) a2) a2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.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 a2 a2)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (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 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #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))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -2 binary64)))
(fma.f64 (/.f64 (*.f64 a1 a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (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 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 a1) (/.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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.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 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 3 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)) (pow.f64 (*.f64 (neg.f64 a1) a1) #s(literal 3 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 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 a2 a1) #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 a2 a1) #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 a2 a1) #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 a2 a1) #s(literal 2 binary64))))
(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 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.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 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)) (*.f64 a2 a2))
(fma.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)) (*.f64 a1 a1))
(fma.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)) (*.f64 a2 a2))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)) (*.f64 a1 a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) a2 (*.f64 a1 a1))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)) (*.f64 a2 a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) 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 (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 (fabs.f64 a2) (fabs.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(-.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 (fabs.f64 a2)) (fabs.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 (fabs.f64 a1)) (fabs.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 a2 a1) #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 a2 a1) #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 a2 a1) #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 a2 a1) #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 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 a2 a2)
(pow.f64 (pow.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (pow.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
#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 (*.f64 a1 a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (neg.f64 a1) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.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)))
(*.f64 (/.f64 a1 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 (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))))
(neg.f64 (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (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 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #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))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -2 binary64)))
(fma.f64 (/.f64 (*.f64 a1 a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (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 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 a1) (/.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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.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 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) 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 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (fabs.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (exp.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))) (exp.f64 (neg.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(cosh.f64 (neg.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))))
(cosh.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64))))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (exp.f64 (asinh.f64 #s(literal 1 binary64))) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(/.f64 (-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))
(/.f64 (-.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(fma.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(-.f64 (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 a1)))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (neg.f64 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(+.f64 (/.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))) (/.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (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 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #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))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -2 binary64)))
(fma.f64 (/.f64 (*.f64 a1 a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (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 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 a1) (/.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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.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 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) 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))))
#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 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #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 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)))) (neg.f64 (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a2 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 a2 #s(literal 4 binary64)) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (pow.f64 a1 #s(literal 4 binary64))) (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 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64))) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (fma.f64 a1 a1 (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #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))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal -2 binary64)))
(fma.f64 (/.f64 (*.f64 a1 a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (/.f64 (*.f64 a2 a2) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (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 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #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))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(-.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 a1) (/.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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 a2) (/.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 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) a2))
(+.f64 (/.f64 (pow.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64)) (-.f64 (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 a2 a1) #s(literal 2 binary64)) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (/.f64 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 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 3 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)) (pow.f64 (*.f64 (neg.f64 a1) a1) #s(literal 3 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 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 a2 a1) #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 a2 a1) #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 a2 a1) #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 a2 a1) #s(literal 2 binary64))))
(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 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.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 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)) (*.f64 a2 a2))
(fma.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)) (*.f64 a1 a1))
(fma.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)) (*.f64 a2 a2))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)) (*.f64 a1 a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (pow.f64 a2 #s(literal 1 binary64)) a2 (*.f64 a1 a1))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)) (*.f64 a2 a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) a1 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (pow.f64 a1 #s(literal 1 binary64)) 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 (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 (fabs.f64 a2) (fabs.f64 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 (fabs.f64 a2) (fabs.f64 a2) (*.f64 a1 a1))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 (fabs.f64 a1) (fabs.f64 a1) (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 (neg.f64 (neg.f64 a1)) a1))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 (neg.f64 (neg.f64 a2)) a2))
(fma.f64 a1 a1 (*.f64 a2 a2))
(-.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 (fabs.f64 a2)) (fabs.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 (fabs.f64 a1)) (fabs.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 a2 a1) #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 a2 a1) #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 a2 a1) #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 a2 a1) #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 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (fabs.f64 (fabs.f64 a1)) (fabs.f64 (fabs.f64 a1)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) a1)
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 a1 a1)
(pow.f64 (pow.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (pow.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (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))))
(*.f64 (/.f64 (*.f64 a2 a2) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.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)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 a1 a1) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (fabs.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (exp.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))) (exp.f64 (neg.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(cosh.f64 (neg.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))))
(cosh.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64))))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (exp.f64 (asinh.f64 #s(literal 1 binary64))) #s(literal 2 binary64)) (/.f64 (exp.f64 (neg.f64 (asinh.f64 #s(literal 1 binary64)))) #s(literal 2 binary64)))
(asinh.f64 #s(literal 1 binary64))
(log1p.f64 (sqrt.f64 #s(literal 2 binary64)))
(log.f64 (exp.f64 (asinh.f64 #s(literal 1 binary64))))

eval72.0ms (1%)

Memory
-3.9MiB live, 189.9MiB allocated; 14ms collecting garbage
Compiler

Compiled 18 756 to 1 991 computations (89.4% saved)

prune28.0ms (0.4%)

Memory
-17.9MiB live, 80.3MiB allocated; 6ms collecting garbage
Pruning

25 alts after pruning (22 fresh and 3 done)

PrunedKeptTotal
New57412586
Fresh91019
Picked325
Done011
Total58625611
Accuracy
100.0%
Counts
611 → 25
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
98.8%
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
56.1%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
62.1%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
57.6%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
98.8%
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
99.6%
(*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64)) (cos.f64 th))
62.1%
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
57.6%
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
▶99.6%
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
98.8%
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
▶98.7%
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
47.1%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
✓66.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
65.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
▶66.1%
#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)))
✓66.2%
#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))))
▶66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
65.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
40.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
65.3%
#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))))
13.0%
#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.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
▶65.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
✓13.0%
#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))))))
Compiler

Compiled 1 418 to 865 computations (39% saved)

simplify112.0ms (1.5%)

Memory
14.5MiB live, 206.5MiB allocated; 18ms collecting garbage
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
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
cost-diff0
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff2
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff4
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 a2 a2)
cost-diff0
#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)))
cost-diff2
(/.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))
cost-diff3
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
cost-diff0
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
cost-diff0
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
cost-diff0
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
cost-diff0
(sqrt.f64 #s(literal 2 binary64))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
cost-diff0
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
cost-diff2
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64))
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
040342
062288
1134288
2437270
31933270
46684270
08443270
Stop Event
1×iter limit
1×node limit
1×iter limit
Calls
Call 1
Inputs
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.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)
#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)))
(/.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))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 a1 a1)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
a1
(*.f64 a2 a2)
a2
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.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
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
a1
(*.f64 a2 a2)
a2
(cos.f64 th)
th
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.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)
#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 (fma.f64 a2 a2 (*.f64 a1 a1)) (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 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 a2)
a2
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 a1 a1)
a1
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
a1
(*.f64 a2 a2)
a2
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.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

localize86.0ms (1.2%)

Memory
13.3MiB live, 200.0MiB allocated; 21ms collecting garbage
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.09765625
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
accuracy0.14453125
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
accuracy0.41796875
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.5781724654916836
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.20931625976844204
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
accuracy1.0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
accuracy21.562112940836087
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.20703125
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
accuracy0.24285126953688405
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
accuracy21.562112940836087
#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)))
accuracy0.14453125
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
accuracy0.41796875
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
accuracy0.5781724654916836
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
accuracy21.562112940836087
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
accuracy0.0
(sqrt.f64 #s(literal 2 binary64))
accuracy0.0
(cos.f64 th)
accuracy0.09765625
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
accuracy0.20931625976844204
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2)))
Samples
66.0ms256×0valid
Compiler

Compiled 278 to 29 computations (89.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 48.0ms
ival-mult: 21.0ms (44.1% of total)
ival-div: 10.0ms (21% of total)
ival-add: 8.0ms (16.8% of total)
ival-cos: 6.0ms (12.6% of total)
ival-sqrt: 2.0ms (4.2% 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)

series38.0ms (0.5%)

Memory
6.1MiB live, 95.5MiB allocated; 16ms collecting garbage
Counts
19 → 73
Calls
Call 1
Inputs
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
(*.f64 (sqrt.f64 #s(literal 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.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 (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 a2 a2)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(cos.f64 th)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
Outputs
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ a2 (sqrt 2)) a2) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole 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))))))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* 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)))))))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Calls

9 calls:

TimeVariablePointExpression
8.0ms
a1
@inf
((/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* a2 a2) (* (sqrt 2) (sqrt 2)) (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th) (* (sqrt 2) (* a1 a1)))
6.0ms
th
@inf
((/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* a2 a2) (* (sqrt 2) (sqrt 2)) (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th) (* (sqrt 2) (* a1 a1)))
4.0ms
a2
@inf
((/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* a2 a2) (* (sqrt 2) (sqrt 2)) (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th) (* (sqrt 2) (* a1 a1)))
3.0ms
a2
@-inf
((/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* a2 a2) (* (sqrt 2) (sqrt 2)) (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th) (* (sqrt 2) (* a1 a1)))
3.0ms
a2
@0
((/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (sqrt 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (* (/ a2 (sqrt 2)) a2) (/ a2 (sqrt 2)) (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* a2 a2) (* (sqrt 2) (sqrt 2)) (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th) (* (sqrt 2) (* a1 a1)))

simplify167.0ms (2.3%)

Memory
-30.7MiB live, 260.9MiB allocated; 72ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02412089
17781985
239051975
084091833
Stop Event
1×iter limit
1×node limit
Counts
73 → 73
Calls
Call 1
Inputs
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ a2 (sqrt 2)) a2) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole 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))))))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* 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)))))))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (cos th) #s(hole binary64 (cos th)))
Outputs
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2)))) (* 1/2 (* (pow a2 2) (* (cos th) (sqrt 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.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(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (+ (* (pow a1 2) (sqrt 2)) (* (pow a2 2) (sqrt 2)))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (+ (* 1/2 (* (pow a1 2) (sqrt 2))) (* 1/2 (* (pow a2 2) (sqrt 2))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a2 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (sqrt 2) (* a1 a1)) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (* (sqrt 2) (* a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (pow a1 2) (* (cos th) (sqrt 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 th)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a2 2) (* (cos th) (sqrt 2))) (pow a1 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.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)))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 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)))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (sqrt 2))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a1 2) (+ (sqrt 2) (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* 1/2 (* (pow a1 2) (sqrt 2)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a1) a1))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a1 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 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)))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (pow a1 2) (cos th)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (/ (pow a1 2) (sqrt 2))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (* (/ a2 (sqrt 2)) a2) #s(hole binary64 (/ (pow a2 2) (sqrt 2))))
#s(approx (* (/ a2 (sqrt 2)) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
#s(approx (/ a2 (sqrt 2)) #s(hole binary64 (/ a2 (sqrt 2))))
#s(approx (/ a2 (sqrt 2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* a2 a2) #s(hole binary64 (pow a2 2)))
#s(approx (* a2 a2) (*.f64 a2 a2))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (* (cos th) (sqrt 2))) (* 1/2 (/ (* (pow a1 2) (* (cos th) (sqrt 2))) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #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 a1 a1)) (*.f64 a2 a2)))))
#s(approx (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 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)))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) #s(hole binary64 (* (pow a2 2) (+ (sqrt 2) (/ (* (pow a1 2) (sqrt 2)) (pow a2 2))))))
#s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) 2) #s(hole binary64 (* (pow a2 2) (+ (* 1/2 (sqrt 2)) (* 1/2 (/ (* (pow a1 2) (sqrt 2)) (pow a2 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (fma.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a2) (/.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 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)))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (*.f64 (fma.f64 (/.f64 a1 a2) (/.f64 a1 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) #s(hole binary64 (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* -1/4 (* (pow th 2) (* (sqrt 2) (+ (pow a1 2) (pow a2 2))))) (* 1/2 (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole 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))))))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/48 binary64) (*.f64 th th) #s(literal -1/4 binary64))) (*.f64 th th))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (+ (* 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)))))))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (fma.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)) (*.f64 (pow.f64 th #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/1440 binary64) (*.f64 th th) #s(literal 1/48 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos 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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (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(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(hole binary64 (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (+.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)) (*.f64 (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole 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))))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (+.f64 (/.f64 (fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 4 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (*.f64 th th) (*.f64 #s(literal 1/24 binary64) (fma.f64 a2 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (cos th) #s(hole binary64 1))
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) #s(hole binary64 (+ 1 (* -1/2 (pow th 2)))))
#s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
#s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64)))
#s(approx (cos th) #s(hole binary64 (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))))
#s(approx (cos th) (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)))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(hole binary64 (* 1/2 (* (cos th) (* (sqrt 2) (+ (pow a1 2) (pow a2 2)))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) #s(hole binary64 (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))
#s(approx (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th)) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (cos th) #s(hole binary64 (cos th)))
#s(approx (cos th) (cos.f64 th))

rewrite93.0ms (1.3%)

Memory
39.6MiB live, 153.8MiB allocated; 42ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
040277
062223
1190205
01388205
Stop Event
1×iter limit
1×iter limit
1×node limit
1×iter limit
Counts
19 → 371
Calls
Call 1
Inputs
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
(*.f64 (sqrt.f64 #s(literal 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.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 (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 a2 a2)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
#s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(cos.f64 th)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
Outputs
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.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)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #s(literal 4 binary64))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -2 binary64))
(/.f64 (neg.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)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a2 (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(+.f64 (*.f64 a1 (/.f64 a1 (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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (cos.f64 th) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (cos.f64 th)) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (cos.f64 th)))
(fma.f64 (cos.f64 th) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (cos.f64 th)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (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))) (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 (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 (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 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #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 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(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 (neg.f64 a2) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(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 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(-.f64 (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(-.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.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 (neg.f64 a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))) (/.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))))
(+.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(+.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #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) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.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 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.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)))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (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))))
(neg.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a2 a2 (*.f64 a1 a1)))
(/.f64 (*.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (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))) (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 (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 (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 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #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 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (neg.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (fma.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64) (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a1)) (fabs.f64 a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a2)) (fabs.f64 a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(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 (neg.f64 a2) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(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 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(-.f64 (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(-.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.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 (neg.f64 a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))) (/.f64 (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1))))
(+.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))
(+.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.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)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #s(literal 4 binary64))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -2 binary64))
(/.f64 (neg.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)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a2 (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(+.f64 (*.f64 a1 (/.f64 a1 (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 a1 (/.f64 a1 (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))))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (fabs.f64 (fabs.f64 a2)) (fabs.f64 (fabs.f64 a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 a2 a2)
(pow.f64 (pow.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (pow.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
#s(literal 2 binary64)
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.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)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 3 binary64))) (fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)))))))
(/.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (fma.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1))) #s(literal 4 binary64))
(/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (*.f64 (+.f64 a1 a2) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a2 #s(literal 6 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 a1 #s(literal 6 binary64)))) (*.f64 (-.f64 (fma.f64 (pow.f64 a2 #s(literal 4 binary64)) #s(literal 2 binary64) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal -2 binary64))
(/.f64 (neg.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)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(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 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (fabs.f64 a1) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) #s(literal 1 binary64) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(fma.f64 a2 (/.f64 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 2 binary64)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(fma.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a1 a1) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (neg.f64 a2) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 #s(literal 2 binary64))))
(+.f64 (*.f64 a1 (/.f64 a1 (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 a1 (/.f64 a1 (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))))
(*.f64 #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 (cos.f64 th) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (neg.f64 th) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) th))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fabs.f64 a1)) (fabs.f64 a1))
(*.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 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))

eval115.0ms (1.6%)

Memory
16.5MiB live, 161.8MiB allocated; 86ms collecting garbage
Compiler

Compiled 13 461 to 1 351 computations (90% saved)

prune147.0ms (2%)

Memory
14.3MiB live, 150.3MiB allocated; 70ms collecting garbage
Pruning

24 alts after pruning (18 fresh and 6 done)

PrunedKeptTotal
New42610436
Fresh9817
Picked235
Done033
Total43724461
Accuracy
100.0%
Counts
461 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
62.1%
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
62.1%
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
57.6%
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
99.6%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)) (cos.f64 th)))
✓98.7%
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
55.2%
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
61.2%
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #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))))
56.8%
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))))
99.6%
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
98.7%
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)) (cos.f64 th))
✓66.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
✓66.2%
#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))))
65.8%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
✓66.0%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
65.2%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
40.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
65.3%
#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))))
13.0%
#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.7%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
✓65.3%
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
✓13.0%
#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))))))
57.6%
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
66.1%
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
98.7%
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
Compiler

Compiled 2 455 to 728 computations (70.3% saved)

regimes260.0ms (3.6%)

Memory
25.6MiB live, 227.6MiB allocated; 149ms collecting garbage
Counts
58 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.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 (/ (+ (* 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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (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))) (*.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))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.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))) (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))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.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 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(fma.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.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 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (cosh.f64 (asinh.f64 #s(literal 1 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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (fma.f64 (sin.f64 th) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 th) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Outputs
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
Calls

8 calls:

71.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)))
46.0ms
(*.f64 a2 a2)
41.0ms
th
29.0ms
a2
29.0ms
(cos.f64 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)

regimes199.0ms (2.8%)

Memory
0.2MiB live, 185.8MiB allocated; 32ms collecting garbage
Counts
51 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.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 (/ (+ (* 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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (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))) (*.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))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.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))) (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))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) #s(literal 2 binary64)) (cos.f64 th))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (*.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 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))) #s(literal 4 binary64)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (cosh.f64 (asinh.f64 #s(literal 1 binary64)))))
(/.f64 (fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (*.f64 (cos.f64 th) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 th) a2) a2) (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) a1) a1))) #s(literal 2 binary64))
(fma.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
Outputs
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
Calls

8 calls:

99.0ms
(*.f64 a2 a2)
19.0ms
a1
17.0ms
th
15.0ms
(cos.f64 th)
13.0ms
a2
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)

regimes257.0ms (3.5%)

Memory
-5.8MiB live, 207.1MiB allocated; 115ms collecting garbage
Counts
41 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.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 (/ (+ (* 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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (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))) (*.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))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.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))) (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))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
Outputs
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
Calls

8 calls:

102.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)))
57.0ms
(*.f64 a2 a2)
40.0ms
a2
15.0ms
(cos.f64 th)
11.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)

regimes97.0ms (1.3%)

Memory
-16.2MiB live, 272.5MiB allocated; 24ms collecting garbage
Counts
39 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.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 (/ (+ (* 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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (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))) (*.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))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.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))) (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))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
Outputs
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes168.0ms (2.3%)

Memory
-1.7MiB live, 232.5MiB allocated; 23ms collecting garbage
Counts
38 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.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 (/ (+ (* 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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (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))) (*.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))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.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))) (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))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) a2) a2)) (cos.f64 th))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 #s(approx (+ (* (* (cos th) a2) a2) (* (* (cos th) a1) a1)) (*.f64 (*.f64 (cos.f64 th) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
Calls

8 calls:

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

Compiled 35 to 40 computations (-14.3% saved)

regimes218.0ms (3%)

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

8 calls:

116.0ms
(cos.f64 th)
30.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)))
24.0ms
a2
10.0ms
th
10.0ms
a1
Results
AccuracySegmentsBranch
98.8%1(*.f64 a2 a2)
98.8%1(*.f64 a1 a1)
98.8%1(cos.f64 th)
98.8%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
98.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)))
98.8%1a1
98.8%1a2
98.8%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes136.0ms (1.9%)

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

8 calls:

28.0ms
th
28.0ms
(*.f64 a2 a2)
26.0ms
a1
18.0ms
(cos.f64 th)
9.0ms
a2
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)

regimes79.0ms (1.1%)

Memory
18.5MiB live, 153.7MiB allocated; 10ms collecting garbage
Counts
31 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 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) a2) a2) (* (* (cos th) a1) a1)) (sqrt 2)) (*.f64 (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64)) (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))) (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))) (fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 #s(approx (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)) (*.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 (/ (+ (* 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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (*.f64 th th) #s(literal 1/24 binary64) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 th th)) #s(literal 1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)) #s(approx (cos th) (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))))
(/.f64 (*.f64 #s(approx (cos th) (fma.f64 (fma.f64 (fma.f64 (*.f64 th th) #s(literal -1/720 binary64) #s(literal 1/24 binary64)) (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 th th) #s(literal 1 binary64))) (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))) (*.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))) (fma.f64 (*.f64 (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 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))) (/.f64 (*.f64 (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 a1 a1 (*.f64 a2 a2))) (*.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))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a2 (/.f64 a2 (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))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (fma.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.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))) (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))))
Outputs
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/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))))
Calls

8 calls:

17.0ms
a1
11.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
10.0ms
(*.f64 a2 a2)
8.0ms
th
8.0ms
a2
Results
AccuracySegmentsBranch
66.2%1(*.f64 a2 a2)
66.2%1(*.f64 a1 a1)
75.8%2(cos.f64 th)
75.8%2(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
75.8%2(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
66.2%1a1
66.2%1a2
66.2%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes11.0ms (0.2%)

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

4 calls:

3.0ms
th
3.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)))
3.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
2.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
66.2%1th
66.2%1(cos.f64 th)
66.2%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
66.2%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 27 to 26 computations (3.7% saved)

regimes21.0ms (0.3%)

Memory
-13.9MiB live, 42.3MiB allocated; 5ms 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
Outputs
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
Calls

8 calls:

5.0ms
th
2.0ms
a2
2.0ms
a1
2.0ms
(cos.f64 th)
2.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
66.1%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
66.1%1(*.f64 a1 a1)
66.1%1a1
66.1%1(cos.f64 th)
66.1%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
66.1%1(*.f64 a2 a2)
66.1%1a2
66.1%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes17.0ms (0.2%)

Memory
-4.7MiB live, 42.3MiB allocated; 1ms 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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))))
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:

3.0ms
a2
2.0ms
th
2.0ms
a1
2.0ms
(cos.f64 th)
2.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
65.3%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
65.3%1(cos.f64 th)
65.3%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
65.3%1a1
65.3%1(*.f64 a1 a1)
65.3%1(*.f64 a2 a2)
65.3%1a2
65.3%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes15.0ms (0.2%)

Memory
-9.9MiB live, 37.0MiB allocated; 2ms collecting garbage
Counts
4 → 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))) #s(approx (/ (+ (* (* a2 a2) (sqrt 2)) (* (sqrt 2) (* a1 a1))) (* (sqrt 2) (sqrt 2))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)))
#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:

3.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
2.0ms
th
2.0ms
a2
2.0ms
a1
2.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
65.3%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
65.3%1(*.f64 a1 a1)
65.3%1a1
65.3%1(cos.f64 th)
65.3%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
65.3%1(*.f64 a2 a2)
65.3%1a2
65.3%1th
Compiler

Compiled 35 to 40 computations (-14.3% saved)

regimes9.0ms (0.1%)

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

Compiled 35 to 40 computations (-14.3% saved)

bsearch1.0ms (0%)

Memory
-45.7MiB live, 1.3MiB allocated; 2ms collecting garbage
Algorithm
1×left-value
Steps
TimeLeftRight
1.0ms
-3.433521997154794e-113
-2.981498785500545e-129
Compiler

Compiled 22 to 18 computations (18.2% saved)

simplify50.0ms (0.7%)

Memory
21.4MiB live, 69.1MiB allocated; 4ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
074347
1136347
2400339
31544339
47002339
Stop Event
1×node limit
Calls
Call 1
Inputs
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(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 -6931674235302037/346583711765101857447301773017885462929554634421977071896309947576827663475703202879996800763017447262173901370175446478621769728 binary64)) #s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/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 (+ (* (/ (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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.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
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (fma.f64 a2 a2 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (fma.f64 a1 a1 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(approx (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) (* (sqrt 2) (sqrt 2))) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(/.f64 (*.f64 (cos.f64 th) #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (+ (* a1 a1) (* a2 a2)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(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 -6931674235302037/346583711765101857447301773017885462929554634421977071896309947576827663475703202879996800763017447262173901370175446478621769728 binary64)) #s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/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)))))
(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 -6931674235302037/346583711765101857447301773017885462929554634421977071896309947576827663475703202879996800763017447262173901370175446478621769728 binary64)) #s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 (*.f64 th th) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))) #s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos 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))) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (/.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (*.f64 (*.f64 (fma.f64 a2 a2 (*.f64 a1 a1)) #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))) (/.f64 #s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) (/.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 (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #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))))))
#s(approx (* (/ (* (sqrt 2) (+ (* a1 a1) (* a2 a2))) 2) (cos th)) #s(approx (/ (+ (* a2 a2) (* a1 a1)) (sqrt 2)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))

derivations441.0ms (6.1%)

Memory
2.9MiB live, 420.2MiB allocated; 65ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 355 to 67 computations (81.1% saved)

preprocess173.0ms (2.4%)

Memory
8.4MiB live, 288.4MiB allocated; 44ms collecting garbage
Remove

(abs a1)

(abs th)

Compiler

Compiled 2 260 to 1 166 computations (48.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...